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IDENTIFICATION 


PRODUCT ID: AC=T327A-MC 

PRODUCT TITLE: CZTUWAO TU8O FRONT END DIAG 
PRODUCT DATE: 24 = APRIL = 1983 
MAINTAINER: TAPE DIAGNOSTIC ENGINEERING 
AUTHOR : DICE SYSTEMS, INC. 


COPYRIGHT (C) 1983 BY 
DIGITAL EQUIPMENT CORPORATION, 
MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE INCLUSION 
OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER COPIES 
THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY OTHER 
— 4 TITLE TO AND OWNERSHIP OF THE SOFTWARE JS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE AND 
—* ly CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL. 
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ABSTRACT 


1.0 ABSTRACT 





a 1S A PDP-11/LSI RESIDENT DIAGNOSTIC WHICH CHECKS THE FUNCTIONALITY 
OF TUSO MAGTAPE SUBSYSTEM WHILE CONNECTED TO A PDP-11 SYSTEM. 


THE PROGRAR PROVIDES ERROR MESSAGES 
FUNCTIONS THAT AID IN THE REPAIR OF THE DEVICE. 
DIGITAL EQUIPMENT DOCUMENTS: 


1. 


2. 


3. 


WHICH IDENTIFY 


en get SPECIFICATION FOR TU8O0 MAGTAPE CONTROLLER; 





a SPECIFICATION FOR TU8O DIAGNOSTIC PACKAGE; 
NUMBER: YM-C194F-00; REVISION NUMBER 0; DATE: 2-SEP-81. 


ENGINEERING SPECIFICATION FOR TU80 MAGTAPE SUBSYSTEM; 
NUMBER: YM-C194S-02; REVISION NUMBER 3; DATE: 10-JUN-81. 





: YM-C194D-022; REVISION NUMBER 2; DATE: 28-JUL~81. 


FAILING 
REFERENCE THE FOLLOWING 


DOCUMENT 


DOCUMENT 


DOCUMENT 


CIQPMAO XXDP+ PROGRAMMER'S MANUAL; DOCUMENT NUMBER AC-S296A-AC; 


DATE: 14 JULY 1980. 
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HARDWARE, SOFTWARE REQUIREMENTS AND PREREQUISITES 


2.0 HARDWARE, SOFTWARE REQUIREMENTS AND PREREQUISITES 
2.1 HARDWARE REQUIREMENTS 


PDP-11 FAMILY PROCESSOR WITH 32K WORDS OF MEMORY 
TU8O MAGTAPE SUBSYSTEM (DRIVE AND CONTROLLER) 
CAUTION:DIAGNOSTIC REQUIRES 32K WORDS OF MEMORY 
(28K USEABLE I.E. 4K FOR 1/0 PAGE) 





2.2 OPTIONAL HARDWARE: 


UP TO 8 TU8O CONTROLLERS PER PDP-11 UP TO 1 DRIVES PER CONTROLLER 


2.3 SOFTWARE REQUIREMENTS 


PDP-11 DIAGNOSTIC SUPERVISOR (HSAADO.SYS) 
PDP-11 DIAGNOSTIC LOADER/MONITOR (XXDP+) 


2.4 PREREQUISITES 





FUNCTIONAL PDP-11/LSI FAMILY CENTRAL PROCESSOR AND MEMORY 
FUNCTIONAL CONSOLE TERMINAL 
FUNCTIONAL STANDALONE DIAGNOSTIC SUPERVISOR 





— — — — 
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OPERATING INSTRUCTIONS-OPERATOR COMMANDS 


3.0 OPERATING INSTRUCTIONS-OPERATOR COMMANDS 








3.1 OPEKATOR COMMANDS 


fe CRO SS SS PMSSSCHSOSSHVOSOSBEKXSSHLTSseevr we 


THE TUSO srg te IS A saa DIAGNOSTIC SUPERVISOR COMPATIBLE 
PROGRAM. ALL LOADING AND RUN TIME INSTRUCTIONS CAN BE REFERENCED 

IN THE PDP-11 PROGRAMMER "S MANUAL ‘‘CIQPMAO XXDP*’ PROGRAMMER’S MANUAL 
NUMBER AC-S296A-AC. 





BOOT THE DIAGNOSTIC XXDP+ MEDIA (OPERATOR RESPONSES ARE UNDERLINED) 
CHMDLBO XXDP+ DL MONITOR 28K 

BOOTED VIA UNIT O 

apts DATE (DD-MMM-YY): 29-JAN-82 

REST 53726 


ART ADDRESS: 1537 
50 HZ? N <CR> 


LSI? NY 
THIS IS XXDP+ TYPE “‘H’’ OR “H/L*’ FOR DETAILS 
R CZTUWA 


CZTUWABINDRS LOADED 
DIAG. RUN TIME SERVICES REV D. APR 79 


CZTUW-A-0 
—2 LOGIC DIAGNOSTICeeee 
UNIT ruso 





DR> 
DRS>START/FLAG: PNT : HOE 


THE ABOVE COMMAND WILL START THE DIAGNOSTIC. THE COMMAND HAS TWO 
ee ON WHICH ARE “PRINT EACH TEST NBR. AS EXECUTED’ AND “HALT ON 









3.2 HARDWARE PARAMETERS 





AFTER INITIAL STARTING OF THE PROGRAM (START COMMAND TO THE 
DIAGNOSTIC SUPERVISOR), THE PROGRAM WILL ISSUE THE “CHANGE HW? 
QUESTION TO ASK IF THE HARDWARE PARAMETERS ARE TO BE CHANGED 
(BY THE OPERATOR). 


ON A V (NO) RESPONSE TO THE “CHANGE HW?"* QUESTION, THE 
ee Bey oy IT vig —*8 F ey 3— + 1 















— — — — — — — 


A — — — 
— — — 
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THE “MUNITS (D)?°* QUESTION. 
TSBA/TSDB=172520, VECTOR =224 


ON A Y (YES) RESPONSE TO THE QUESIION, THE FOLLOWING QUESTIONS 
WILL THEN ED TC AL THE OPERATOR TO SELECT THE UNITS 





ESPONSE. AN 
OLICITED. AN *(L)"’ 
THAT A LOGICAL RESPONSE IS TO BE MADE: V FOR YES, ‘N° FOR NO. 


# UNITS (D) ? < ENTER THE NUMBER OF M7454 CONTROLLERS 
PRESENT TO BE TESTED> 


INDICA MAL 
**(0)"* INDICATES AN OCTAL NUMBER IS BEING S$! 


UNIT 0 


DEVICE ADDRESS (0) 172520 ? <ENTER THE ADDRESS OF THE 
TSBA/TSDB REGISTER> 


VECTOR (0) 224 ? <ENTER ADDRESS OF INTERRUPT 
VECTOR> 


THE ADDRESS AND VECTOR QUESTIONS WILL BE ASKED FOR 9 OF THE 
NUMBER OF UNITS (CONTROLLERS) git IN THE ** E 

QUESTION. LOGICAL UNIT NUMBERS ARE ASSIGNED IN ORDER "BEGINNING 
AT 0. UP TO EIGHT UNITS CAN BE SELECTED FOR TESTING. 






3.3 SOFTWARE PARAMETERS 


THE FOLLOWING QUESTIONS ARE ASKED ON A START, RESTART, OR CONTINUE. 
THEY ALLOW FLEXIBILITY IN THE WAY THE PROGRAM BEHAVES. 


CHANGE SW (L) ? < TYPE “‘Y’* TO CAUSE THE FOLLOWING 
QUESTIONS TO BE ASKED.> 


INHIBIT ITERATIONS (L) N ? < TYPE ‘“‘Y’* TO PREVENT MULTIPLE 
ITERATIONS OF CERTAIN TESTS. 
THIS CAUSES EACH TEST PASS TO 
RUN AS QUICKLY AS POSSIBLE. 


ONLY QUICK-RUNNING LOGIC 
TESTS USE MULTIPLE ITERATIONS.> 





SEQ 6 
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OPERATING INSTRUCTIONS - SAMPLE PRINTOUTS 


4.0 OPERATING INSTRUCTIONS - SAMPLE PRINTOUTS 
4.1 EXAMPLE OF ALL TESTS RUN TOGETHER 


TST: 001 — #1 
4 002 RAM TEST 

: 003 COMMAND REJECT TEST 
ne 004 WRITE CHARACTER:STICS TEST 
TST: 005 VOLUME CHE 
TST: 006 COMPLETION INTERRUPT TEST 
TST: 007 BASIC PACKET PROTOCAL TEST 
TST: 008 NON-TAPE MOTION COMMANDS TEST 

MEMORY ADDRESSING 


TST: 009 DMA ST 
TST: 010 INITIALIZATION AFTER WRITE CHARACTERISTICS TEST 
TST: 011 BASIC WRITE SUBSYSTEM MEMORY TEST 


0 ERRORS 
NOTE: PROGRAM NOW STARTS OVER AGAIN AT TEST 1 















— — — ew 
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OPERATING INSTRUCTIONS - SAMPLE ERROR MESSAGES 


SEQ 8 


5.0 OPERATING INSTRUCTIONS - SAMPLE ERROR MESSAGES 


ERROR MESSAGE EXAMPLE 1 


TST: *3 FIFO EXERCISER TEST 
CZTUA HRD ERR 01610 ON UNIT 00 TST 016 SUB 000 PC: 040624 
FIFO STATUS (IN WORD 9) INCORRECT AFTER WRITE FIFO 


TAPE BUS SIGNALS IN WORD #8: - DESIGNATOR <BIT @> 
PARERR<15> IEOT 98 IFMK <9> IRDY<6> IRWD<2> 
IRESV2<14> to gap IHER <8> IONL<S> IFBY<1> 
IRESV1<13> ICER <10> ISPEED<7> ILDP<4> IFPT<0> 
TAPE BUS S$ SIGINALS IN 













FER 

WORD #0 EXPD: 100020 
WORD #1 EXPD: 000012 
WORD #2 EXPD: 000000 
WORD #3 EXPD: 000010 
WORD #4 EXPD: 000000 
woRD #5 EXPD: 000000 
WORD #6 EXPD: 000000 
WORD #7 EXPD: 000000 
WORD #8 EXPD: 

WORD #9 EXPD: 


ERROR MESSAGE EXAMPLE 2 


CZTUWA HRD ERR 00159 ON UNIT 00 TST 001 SUB 005 PC: 026202 
TSSR NOT CORRECT AFTER SPACE RECORDS COMMAND 

TSSR = 100214 

TSSR BITS SET: SC.SSR 

TERMINATION CLASS CODE = UNRECOVERABLE ERROR 

PACKET SS = 026420 
PACKET 
PACKET 
PACKET 
PACKET 





ERROR MESSAGE EXAMPLE 5 
CZTUWA HRD ERR 00121 ON UNIT 00 TST 001 SUB 002 PC: 0253506 
MOT BIT (XSTO) NOT SET DURING REWIND (EXTENDED FEATURES MODE) 
EXPD: 000312 RECV: 000112 xOR: 000200 


PROGRAM RUN TIRES 








— ———— —— — — — — — — — — — 
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SEQ 9 


6.0 PROGRAM RUN TIMES 


THE AVERAGE RUN TIMES OF THE PROGRAM ARE LISTED BELOW.THESE FIGURES ARE 
TO BE USED AS A GUIDE. THE TIMING WAS DONE ON A PDP-11/25 (LSI) 
PROCESSOR WITH A LA=34 CONSOLE. 


THE PROGRAM RUNS IN TWO MODES; NO ITERATIONS AND DEFAULT MODE. IN THE 
NO ITERATIONS MODE, EACH TEST IS RUN ONCE, WITH NO ITERATIONS. IN THE 
EFAULT NODE EACH TEST IS REPEATED BY THE NUMBER OF TIMES INDICATED BY 

NO ITERATIONS MODE IS SELECTED BY ANSWERING THE 


THE ITERATION COUNT. 
INHIBIT ITERATIONS QUESTION WITH A "'Y'’ (YES). 









TEST N/I ITER DEF 
NUMBER SECS. SECS SECS. 

1 1 30 29 
2 25 120 95 
3 25 475 450 
& 20 20 0 
5 4 10 9 
6 20 20 0 
7 2 1 1 
8 8 11 3 
9 1 1 0 
10 1 1 0 
11 1 1 0 


THE TIMES REQUIRED TO RUN TESTS 1 THROUGH 12 IN ONE COMMAND: 


Q.V. 1 MIN 57 SECONDS 
DEFAULT 12 MINS 


— — oe — — —— 
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SEG 10 


7.0 TEST DESCRIPTIONS 
7.1 TEST 1 = "7 TIALIZATION TEST #1 


SQeereeeeeeeeeeeeeereeenerereeeerreereeeerereererenaneereneneneeese 
* NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU8O’S * 
* CONTROLLER (M7454) * 


IIEVXXRR— 





THIS TEST VERIFIES THAT THE M7454 MODULE’S DEVICE REGISTERS ARE 
ACCESSIBLE ON THE BUS (SUBTEST 1) AND THEN CHECKS THAT THE 
BUILT-IN yy gt. SELF-TEST MICRODIAGNOSTIC DID NOT FIND 
PROBLEMS WITH THE E. ARE 





ANY BASIC AS OF LOGIC TESTED BY THE 
SELF-TEST SEQUENCER ARE AS FOLLOWS: ROM AND PIPELINE REGISTER, 
nee el — * BUSES, 2901 MICROPROCESSOR, RAM AND 

T TATUS FLOPS. THIS TEST vy oe THE CONTROLLER 

BY ISSUING BUS INIT SIGNAL VIA A RESET INSTRUCTION, OR 

BY WRITING INTO THE TSSR REGISTER, AND THEN CHECKS THE CONTENTS 


THE TSSR REGISTER. SUCCESSFUL INITIALIZATION IS INDICATED 
Y (SSR) AND NEED BUFFER ADDRESS (NBA) Ny 








UAL » AND THE 
DISCREPANC?2S. SUBTEST RUN FORCES FORCES SEL oTEST TO RUN 
BY DOING A BYTE WRITE TO THE TSSR. 


7.2 TEST 2 - RAM TEST 


IIAXXRGR 
# NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU8O'S % 
# CONTROLLER (M7454) & 


SRAEARAAAAAARAAHAAAAHAAAAARARAAAAATETAASAAASRASAAATAAAAAEARAERERAAAAAEAEE 


THIS TEST VERIFIES THAT ALL LOCATIONS OF THE RAM ON THE oie 
CAN PROPERLY STORE AND READ BACK ALL DATA imgeoad AND T 

EACH RAM LOCATION IS UNIQUELY Bag nb (IE: THAT ONE AND ONLY 
ONE LOCATION IS ACCESSED BY ANY PARTICULAR ADDRESS). THESE TESTS 
ARE PERFORMED BY THREE SUBTESTS DESCRIBED BELOW. 


7.2.1 TEST 2, SUBTEST 1:- 


THIS SUBTEST VERIFIES EACH LOCATION BY PERFORMING THE FOLLOWING 
SEQUENCE FOR EACH ADDRESS 0-577 (OCTAL): 


1. THE ADDRESS TO BE TESTED IS LOADED INTO THE TSDB+1 
(VIA A HI-URITE BYTE). 


2. THE ADDRESSED RAM LOCATION IS READ, THEN WRITTEN INTO 
THE LOW BYTE OF THE TSBA. THE LOW BYTE OF TSDB. 








es - 


—— — — — — 
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3. THE LOW BYTE OF THE TSBA IS CHECKED TO SEE IF Y 
CONTAINS THE DATA PATTERN ORIGINALLY WRITTEN; 
DISCREPANCY IS REPORTED AS AN ERROR. 


4. THE ADDRESS OF THE LOCATION BEING TESTED IS AGAIN 
hy INTO TSDB+1 (HI-BYTE WRITE), TO CAUSE THE 
LOCATION UNDER TEST TO AGAIN BE READ INTO THE LOW 
BYTE OF TSBA. THE LOW BYTE OF TSBA IS AGAIN CHECKED 

AND DISCREPANCIES REPORTED. 


7.2.2 TEST 2, SUBTEST 2:- 

THIS SUBTEST USES THE SAME RAM READ/URITE — 188 F. 

SUBTEST 1, EXCEPT THAT MEMORY IS FILLED WITH ZEROS AND 
S WORD IS ‘WALKED*’ DOWN T PRIOR TO THE 


ONE HROUGH. PRI ALL ONES 
—* TO ME MEMORY IS CHECKED TO BE SURE THAT THE 


MORY THE 
RO WORD HASN'T ‘PICKED’ A BIT. 





7.2.3 TEST 2, SUBTEST 3:- 


THIS SUBTEST IS SIMILAR —* *71 2, EXCEPT THAT MEMORY IS 
FIRST SET TO ALL ONES AND A BYE OF ZEROS IS ‘WALKED’ DOWN 
THROUGH MEMORY BEGINNING AT LOCATION TOP-2. 


7.3 TEST 3: COMMAND REJECT 


RAEKAARSRAAAAARAAAAAAARAKAAARARAAAAAAAAAETEAELAEAAAAAARAAAARAAAERARARAAA 


* NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU80'S * 
* CONTROLLER (M7454) ® 


RRAAAAKAAAAAAAAAAAAAAAAAAARAAAAAAEAAAATHAARARAAAAAAARARAAARARAARARAERS 


THIS 2 4—* THAT ALL COMMANDS OTHER THAN WRITE 









CHARACTERISTICA ARE REJECTED DUE TO THE NEED BUFFER ADDRESS 
(NBA) ae BEING SET IN TSSR, AND THAT THE TSBA, AND THE TSSR 
REGISTERS THE PROPER STATE AFTER EACH COMMAND 














ARE SET IN 

1S REJECTED. THIS TEST CHECKS THE MICROPROCESSOR SEQUENCING, 
BASIC COMMAND DECODING Tl HANDLING. THE TEST CONTAINS 
TWO SUBTESTS: SUBTEST 1 SE LC 


QUENCES THROUGH ALL COMMAND 

CHARAC TERISTICS) WITH THE INTERRUPT ENABLE BIT CIE) BIT 

INTERRUPT IS NOT GENERATED BY 

TWO PERFORMS SIMILARLY 
SUB efs T THE IE BIT IN EACH C 

AND VERIFIES THAT AN INTERRUPT IS GENERATED WHEN THE COMMAND 

1S REJECTED. THE SUBTEST 1 SETS UP THE alge SERVICE 

ROUTINE TO FLAG UNEXPECTED INTERRUPTS. COMMAND WORD 

IN THE COMMAND BUFFER IS INITIALIZED TO “160000 (OCTAL) AND 

THE REMAINING THREE WORDS IN THE COMMAND BUFFER ARE SET 

a PATTERNS. THEN THE FOLLOWING SEQUENCE IS 


1. INITIALIZE THE CONTROLLER BY WRITING INTO 
LF PROPER INITIAL CONDITIONS ARE 
























a 1 
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2. TSDB IS WRITTEN WITH ADDRESS OF THE COMMAND 
BUFFER TO START PROCESSING. 
3. THE PROGRAM WAITS FuR SSR TO SET; IF SSR DOES 


NOT SET, AN ERROR REPORT IS ISSUED AND THE TEST 
IS ABORTED. 


4. THE CONTENTS OF THE TSSR ARE CHECKED. TSSR IS 
CORRECT IF IT CONTAINS EITHER OCTAL 102206 OR 
ja MY 6 DEPENDS ON THE STATE OF THE TAPE 





5. THE CONTENTS OF og ARE CHECKED. TSBA SHOULD 
CONTAIN THE INITIAL COMMAND BUFFER ADDRESS 
(LOADED IN STEP 2) IE: TSBA SHOULD POINT TO 
THE COMMAND PACKET. 


6. USING THE MAINTANENCE MODE WRAP AROUND FUNCTIONS, 
THE COMMAND IMAGE BLOCK IN THE M7454°S RAM 
(LOCATIONS 20 - 27 (OCTAL)) ARE CHECKED; THE 
IMAGE SHOULD CONTAIN A COPY OF THE FOUR C 
PACKET WORDS AS SET UP IN CPU MEMORY. 


THE COMMAND WORD IN THE COMMAND BUFFER IS IN- 
CREMENTED TO THE NEXT PATTERN NOT CONTAINING 
WRITE CHARACTERISTICS; OR IE. THE REMAINING 
THREE WORDS OF THE COMMAND BUFFER ARE SEQUENCED 
WITH PSE DATA. IF THE COMMAND WORD HAS 
NOT REACHED ITS MAXIMUM VALUE (1777741) THE 

TEST SEQUENCE IS REPEATED. 



































SUBTEST 2 IS IDENTICAL TO SUBTEST 1, EXCEPT THAT THE PROGRAM 
CAUSES THE IE BIT TO BE SET IN EACH COMMAND WORD AND THEN 
VERIFIES THAT AN INTERRUPT OCCURS.; 


7.4 TEST 4 = WRITE CHARACTERISTICS 


NGKXXSISIIRR 
⁊ NOTE: IF THIS TEST DETECTS A FAILURE REPLACE THE TUSO'S * 
# CONTROLLER (M7454) * 


EEEEEVECIIIIIRRRRM 


THIS TEST VERIFIES BASIC OPERATION OF THE WRITE CHARACTERISTICS 
COMMAND. IT VERIFIES THAT THE COMMAND BLOCK AND CHARACTERISTICS 
FETCHE yp A ee 


PROPERLY, . 
APPROPRIATE. THIS TEST 
a ED BY —a 
BITS THESE BITS 


MODE DATA BITS OPERATE PROPERL 
IS VERIFIED IN SUBSEQUENT TESTS. OMMANDS EXECUTED IN THIS 
TE SHO INTERRUPTS. ERRUPT ENABLE (IE) BIT CLEARED TO ZERO, 


§ SHOULD BE TED. R PROGRAM 
RUNS A T PROCEESOR PRIORITY ZERO, WITH TWE INTERRUPT, SERVICE 
ROUTINE SET UP T 






















SEQ 12 
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OCCURS A PROBLEM EXISTS IN EITHER THE LSI-11 BUS INTERFACE SECTION 
OR IN THE ROM OR PIPELINE. 


THIS TESTS VARIOUS MICROPROGRAM SSQUENCES, — DECODING, 

DMA L BASIC PACKET PROTOCAL HANDLING. THIS IS THE 

F RST TEST IN WHICH DATA DMA CYCLES (FOR STORING THE MESSAGE 

ro ng ) ARE PERFORMED. oe ee That IN THE BODY OF THE TEST 
(IE: ERRORS OTHER THAN INITIALIZA ATION ERRORS RELATED TO THE 

TRANSPORT BUS) DEFINITELY INDICATE A BAD M7454 MODULE. 


















SEQ 15 
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7.4.1 TEST 4, SUBTEST 1:- 


VERIFIES BASIC STANDARD OPERATION (USING PROPER * BUFFER 
AND LENGTH DATA IN AN INCREMENTING SERIES OF VALUES FOR THE 
— CHARACTERISTICS DATA IN THE LHARACTERISTICS DATA BLOCK.). 
FTER THE COMMAND IS EXECUTED FOR EACH VALUE OF THE FOURTH 
CHARACTERISTICS DATA WORD, THE PROGRAM VERIFIES THAT: 


1. THE TSSR IS CORRECT, oy try A CHECK THAT THE NBA 
BIT IS CLEARED AND THAT NORMAL TERMINATION WAS 
ACCOMPLISHED. ; 

2. THAT A PROPER MESSAGE PACKET IS STORED. 


3. THAT THE COMMAND PACKET CHRACTERISTIC DATA, AND MESSAGE 
PACKET IMAGE BLOCKS IN M7454 RAM ARE CORRECT. 

7.4.2 TEST 4, SUBTEST 2:- 
VERIFIES THAT THE COMMAND IS REJECTED AND THAT THE NBA BIT DOES 
NOT GET CLEARED IF NONZERO BITS ARE SET INTO ANY RESERVED OR 
UNUSED FIELD WITHIN THE FIRST THREE COMMAND PACKET WORDS. 
7.4.3 TEST 4, SUBTEST 3:- 
VERIFIES THAT THE COMMAND IS REJECTED AND THAT THE NBA BIT 


—* NOT GET CLEARED IF THE MESSAGE BUFFER ADDRESS SPECIFIED 
THE oy” to DATA BLOCK DOES NOT SPECIFY A LEGAL 


7.5 rest s: VOLUME C 


IIIIIIIIINXXXXEX 
* NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU80°S * 
⁊ CONTROLLER (M7454) ¢ 


THARAAAARARAAASAAARAARAAAAAAAAAAAARAAAAAAAAEAAAAAAAAAAAAAAAAAARARARAE 





THIS TEST VERIFIES THAT THE a CHECK (VCK) BIT, A_FLAG HELD 
THE M7454 AND APPE xST0, ee BY gh AND 


STICS COMMAND WITH THE CVC 

CHARACTERISTICS WITH THE CvC 
OF THE VOLUME CHECK BIT. 

ACTUAL FUNCTION OF VOL HAT OF PREVENTING OR ALLOWING 

A TAPE MOTIN COMMAND DEPENDING. ON WHETHER VOLUME CHECK IS SET OR 

CLEAR , IS NOT CHECKED BY THIS TEST; THIS FUNCTIONALITY IS CHECKED 

IN THE INDIVIDUAL TESTS OF TAPE MOTION COMMANDS. 

THE TEST PROCEEDS AS FOLLOWS: 














1. THE CONTROLLER IS INITIALIZED BY WRITING INTO THE TSSR. 

2. A WRITE CHARACTERISTICS COMMAND IS ISSUED (WITH CvC=0) 

3. THE PREVOUS STEP IS rf TO VERIFY THAT VCK DOES 
NOT CHANGE (REMAINS AT 0). 


2st’ i*% 


———— — — — — — —— —— 


— — — —— 
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6. A WRITE CHARACTERISTICS COMMAND IS ISUED WITH CvC=1 
AND THE VCK BIT IN XSTO IN THE MESSAGE BUFFER IS 
EXAMINED; THE VCK BIT SHOULD BE CLEAR (0). 


5. A WRITE CHARACTERISTICS COMMAND IS ISUED WITH CvC=0 
AND THE VCK BIT IN XSTO IN THE MESSAGE BUFFER IS 
BIT SHOULD REMAIN CLEAR (0). 
LOC 0 TO BE WRITTEN TO ALL 









WHICH SHOULD CAUSE RAM LOCATION 
1°S SINCE 2901 REGISTERS 10 AND 11, SPECIFYING THE RAM 
ADDRESS, SHOUL 0. RAMA L 





D BE OCATION IS VERIFIED BY 
LOW BYTE OF TSBA SHOULD CONTAIN ALL 1°S. 


4. THE ENTIRE RAM IS SCANNED. LOCATION 0 SHOULD CONTAIN 
ALL 1°S AND THE REMAINING LOCATIONS, EXCEPT FOR THE 
FER I EA, SHOULD CONT 


MESSAGE BUFFER IMAGE AR d AIN 0. 
DISCREPANCIES ARE REPORTED. AN ERROR AT THIS POINT IS 


MOST LIKELY DUE TO A ROM, PIPELINE OR SEQUENCER PROBLEM 
OR A TIMING PROBLEM. 














7.6 TEST 6 = COMPLETION INTERRUPT 


XXXRRR 
* NOTE; IF THIS TEST DETECTS AN ERROR REPLACE THE TU80'S * 
® CONTROLLER (7454) ¥ 


RAKAKAAAAAAAAAAAARAAAAAAAAAAAAHAAAARAAAAETAAEREREERAAAAAAAAKAAARAAAAE 


THIS TEST VERIFIES THAT AN INTERUPT IS GENERATED AT THE COMPLETION 
OF THE WRITE CHARACTERISTICS COMMAND IF THE INTERRUPT ENABLE (JE) 
BIT IN THE COMMAND HEADER WORD IS SET. THIS TEST CHECKS THE 
—— OF THE INTERRUPT LOGIC AND BASIC PROCESSING OF THE 









THE SEQUENCES OF TEST 7 ARE REPEATED, EXCEPT THAT THE INTERRUPT 
Ic IS PECT INTERRUPTS AND EACH WRITE 


IS VERIFIED, WHERE APPROPRIATE , THAT THE 
OF ANY MESSAGE PACKET IS SE HAT AC 
S GENERATED. FINALLY — y OF 


I TWO COMMANDS ARE 
FIRST WITH att AND T ITH 1€20. IT IS eo D THAT 


NO INTERRUPT IS GENERATED AFTER THE SECOND COMMAND AND T 
1€ BIT IN xXSTO IS 0. 

















7.7 TEST 7 = BASIC PACKET PROTOCAL 


XXRXEXRER 
e NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU80'S * 
* CONTROLLER (7454) * 


PTT TTL LILI ea A dd 


THIS TEST VERIFIES BASIC OPERATION OF THE MESSAGE BUFFER RELEASE 
COMMAND, THE FUNCT THE ACK BIT IN THE COMMAND HEADER WORD, 
AND THE REGISTER MODIFICATION REFUSED (RMR) LOGIC. 








SEG 15 


— — — — — — 
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HAT THE SEC ORMAND IS I 
7.8 rest 8 - NON-TAPE ROTION COMMANDS 


TEST 9: COMPLETION INTERRUPT 


7.7.1 TEST 7, SUBTEST 1:- 
VERIFIES = THE BASIC oy Pe BUFFER RELEASE COMMAND OPERA 






PROPERLY ME R RELESSE INTERRUPTS ARE DISABLED. 
(ERI=0 ON PREVIOUS WRITE CHARACTER IsTICS COMMAND). CHECKS THAT 
TSSR IS UPDATED PROPERLY AND THAT NO INTERRUPT IS GENERATED 


ATED 
(EVEN IF THE JE BIT IN THE COMMAND WORD IS SET) AND THAT NO 
MESSAGE PACKET IS STORED. 


7.7.2 TEST 7, SUBTEST 2:- 


VERIFIES THAT THE BASIC MESSAGE BUFFER RELEASE COMMAND OPERATES 
PROPERLY WHEN MESSAGE BUFFER RELEASE INTERRUPTS ARE ENABLED 
(ERI=1 ON PREVIOUS WRITE yaw pe La ICS COMMAND). CHECKS THAT 
TSSR 1S UPDATED PROPERLY AND T AN INTERRUPT IS GENERATED (IF 
THE JE BIT IN THE COMMAND WORD "s set) BUT THAT NO MESSAGE 
PACKET IS STORED. 









7.7.3 TEST 7, SUBTEST 3:- 


VERIFIES THAT AFTER THE CPU GIVES UP OWNERSHIP OF A MESSAGE 
BUFFER (VIA THE MESSAGE BUFFER RELEASE COMMAND), THAT A NEW 
COMMAND (E.G... WRITE CHARACTERISTICS) IS PROPERLY EXECUTED WHEN 
ISSUED WITH THE ACK BIT IN THE COMMAND HEADER EITHER SET OR CLEAR. 








7.7.4 TEST 7, SUBTEST 4:- 


VERIFIES THAT THE REGISTER gt ay REFUSED (RAR) BIT IN 
TSSR OPERATES PROPERLY WHEN A COMMAND (URI 4J CHARACTERISTICS) 
IS BEING EXECUTED. THE PROGRAM 4 ae THE WRITE CHARACTERISTICS 
COMMAND (FROM ONE COMMAND ER) —9* IMMEDIATELY WRITES THE 

ge BUFFER (CONTAINING ANOTHER WRITE 
WITH is F SPECIFYING DIFFERENT 
PROGRAM VERIF aT. 




















5*rF 


IIIXXKxxxx 
e NOTE: IF me FAY DETECTS AN ERROR REPLACE THE TUSO'S * 
¢ CONTROLLER * 










—* TEST VERIFIES PROPEL . ERATION OF THE GET STATUS AND 

TIALIZE COMMANDS. THREE SUBTESTS ARE USED. THE FIRST TWO 
VERIFY THAT THE RESPECTIVE COMMANDS RU TO COMPLETION AND 
STORE A VALID MESSAGE PACKET. 


THIS TEST VERIFIES THAT AN INTERRUPT IS GENERATED AT THE 
COMPLETION OF THE WRITE CHARACTERISTICS COMMAND IF * INTERRUPT 
ENABLE (J ) iT a T wewwew vv " £ GURY 





SEG 16 





Ee 2 


017 
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CHECKS THE FUNCTIONING OF THE INTERRUPT LOGIC AND BASIC 
PROCESSING OF THE IE BIT. 










HAT THE INTERRUPT 
18 EACH , ts 








IS prog hf WHE IATE, THA 

OF ANY MESSAGE PACKET IS SET AND THAT A COMPLETION INT 

GENERATED. FINALLY. A SEQUENCE OF TWO COMMANDS ARE ISSUED, THE 
WITH IEs0. IT IS pores ee B THAT 








FIRST WITH IE=1 AND THE SECOND W 
NO INTERRUPT IS GENERATED AFTER THE SECOND COMMAND AND T 
IE BIT IN xXSTO IS 0. 








7.9 TEST 9 = MEMORY ADDRESSING TEST 


e NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU80’S e 
# CONTROLLER (M7454) x 


KHASAARASRASAARAAAAAAAAAAAARAAAAASAASTAASSEAEKRASAAAATAAARAAAEKAAALAAAES 





THIS TEST VERIFIES THAT THE ee CAN PROPERLY ADDRESS 
CCESS ALL AVAILABLE CPU MEMORY ( OTHER THAN THAT ph 

BY THE DIAGNOSTIC AND THE DIAGNOSTIC SUPERVISOR CODE) FOR BOTH 

READING (DATI) AND WRITING (DATO). VERIFIED ARE 


THE PDP-11 BUS 
DRIVERS FOR ALL AVAILABLE ADDRESS LINES. UP TO THIS POINT ONLY 
16 BITS HAVE BEEN USED FOR DARA TRANSE ERS. 











7.9.1. TEST 9, SUBTEST 1:- 
THIS SUBTEST VERIFIES THE CONTRCLLER CAN ag A GET STATUS 
COMMAND FROM MEMORY LOCAT WORD BL 


ALL AVILABL LOCATIONS. OCKS ARE 
TESTED ONE AT A TIME Zs os ts hw ALL AVAILABLE MEMORY 
TO A BACKGROUND PATTERN OF 125252. A GET STATUS COMMAND IS THEN 
EXECUTED TO VARIOUS ADDRESSES IN EACH AVAILABLE MEMORY 4K BLOCK. 
THE VARIOUS ADDRESSES ARE ⸗ BY FLOATING FIRST A 1 THEN 
A0 THROUGH THE ADDRESS BITS 

















7.9.2 TEST 9, SUBTEST 2:- 


THIS SUBTEST VERIFIES THE CONTROLLER CAN DEPOSIT MESSAGE PACKETS 

AVAILABLE MEMORY t « FIRST ALL AVAILABLE REROR 
OF 125252. WRITE yh ge 
— RESSAGE —* fei me SET 










s 
THROUGH THE ADDRESS BIT 15. 


7.9.3 TEST 9, SUBTEST 


F 2 
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THIS po Abd VERIFIES THAT A Swing CAN E REPORY WRITE 


AILABL 

AVAILABLE MEMORY IS SET TO A BACKGROUND 
RND OF 125252. THE WRITE CHARALTERISTICS COMMANDS ARE 
EXECUTED WITH CHARACTERISTIC DATA BLOCKS AT VARIOUS MEMORY 
ADDRESSES. THE VARIOUS MEMORY ADDRESSES ARE DETERMINED BY 
FLOATING FIRST A 1 THEN A 0 THROUGH THE ADDRESS BITS. 

















7.9.4 TEST 9, SUBTEST 4:- 


THIS SUBTEST VERIFIES THE NXM ERROR BIT IN THE TSSR REGISTER IS 
SET WHEN ATTEMPTING TO FETCH DATA ( A CHARACTERISTIC DATA BLOCK) 
FROM SELECTED NONEXISTANT LOCATIONS. IF NXM FAILS TO SET IT IS 
LIKELY THAT AN LSI-11 BUS DRIVER IS FAILING TO ASSERT AN ADDRESS 
LINE. ADDRESSES TESTED yee 5 ALL COMBINATIONS OF HIGH ORDER 
ADDRESS BITS (IE: BITS 16-21) 





7.10 TEST 10 = INITIALIZE #3 


IIIIXEXAI 
* NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU80°S * 
* CONTROLLER (M7454) ® 


RLAARAAAAAEKAAAAAAARATARAAAAARALAAKAEARAARARAAAASEAAKERARARAAAARAAEAAKE 


THIS TEST VERIFIES THAT A HARDWARE INITIALIZE COMMAND INVOKED 
AFTER A WRITE CHARACTERISTICS COMMAND SETS UP THE COMMAND, 
—U — CHARACTERISTIC IMAGE BLOCCK IN THE CONTROLLER RAM 


7.11 TEST 11 = BASIC WRITE SUBSYSTEM MEMORY COMMAND 


KHAAHAHKSLSAATAAKAAAAAAAARASHAAASATEAAAKATEKAAAEAAAKAARAAAAAEES 


* NOTE: IF THIS TEST DETECTS AN ERROR REPLACE THE TU8O"S * 
* CONTROLLER (M7454) * 


KATHHAAAAAAAAAAARAAAAAAAAAAAHAAAASSTAA HAHAHA AAAERAAAAARAAAREEE 


THIS by ge THAT THE WRITE SUBSYSTEM MEMORY C 


OMMAND 
WITH A BSELO SELECT CODE OF 0 (NO-OP) EXECUTES CORRECTLY. 
AM COMMAND DECODING 





THE TEST FURTHER VERIFIES MICROPROGRAR 
AND HANDLING SEQUENCES. 





SEO 18 


el 
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002000 


VVVWO 
as 
WUE RU 


eb 
i=] 
os 
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.SBTTL PROGRAM HEADER 
“MCALL SVC 

Svc ; INITIALIZE SUPERVISOR MACROS 
~ENABLE LC 
whuIST BEX, CND 
-ENABL _AMA,ABS 






TUV2A: : 


i 


BGNMOD TUV2A 


THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
:_THE DIAGNOSTIC PROGRAM AND THE SUPERVISCR. 


POINTER BGNSU.BGNSE BGNAU,BGNDU,BGNRPT ,BGNSETUP 
HEADER CZTUW,A,0,6 655.,0 


LSNAME: : 301 — NAME 
ASCII /C/ 
ASCII /2/ 
ASCII /T/ 
ASCII /U/ 
ASCII /U/ 
BYTE 
BYTE 0 
BYTE 0O 
LSREV:: sREVISION LEVEL 
ASCII /A/ 
LSDEPO:: 30 
ASCII /0/ 
LSUNIT:: sNUMBER OF UNITS 
-WORD TSPTHV 
LSTIAL:: 655 sLONGEST TEST TIME 
LSHPCP: : sPOINTER TO H.W. QUES. 
-WORD LSHARD 
LSSPCP:: sPOINTER TO S.W. QUES. 
eWORD LSSOFT 
LSHPTP:: sPTR. TO DEF. H.W. PTABLE 
-WORD LSHW 
LSSPTP:: sPTR. TO S.W. PTABLE 
-WORD LSSW 
LSLADP: : sDIAG. END ADDRESS 
eWORD LSLAST 
LSSTA:: sRESERVED FOR APT STATS 
-WORD 0 
LSCO:: 
eWORD 0 
LSDTYP:: sDIAGNOSTIC TYPE 
-WORD 0 
LSAPT:: sAPT EXPANSION 
WORD 0 
LSDTP:: sPTR. TO DISPATCH TABLE 
WORD LSDISPATCH 
LSPRIO: : sDIAGNOSTIC RUN PRIORITY 


— — — — — — — 


SEO 19 | 


naa — — — — — 


— 
LL — — — 


nee — — — — — — 


H 2 











SEQ 20 
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PROGRAM HEADER 
838* LSENVI:: sFLAGS DESCRIBE HOW IT WAS SETUP 
000000 -WORD 
002046 LSEXP1:: s EXPANSION WORD 
002046 000000 é 
poss ty LSMREV:: sSVC REV AND EDIT @ 
003 BYTE CSREVISION 
002051 03 BYTE CSEDI 
—8 LSEF:: sDIAG. EVENT FLAGS : 
002052 000000 WORD 0 
002054 000000 -WORD 0 
002056 LSSPC:: 
002056 é 0 
88 LSDEVP: : s POINTER TO DEVICE TYPE LIST 
003334 eWORD LSDVTYP 

002062 LSREPP: : sPTR. TO REPORT CODE 
002062 022702 -WORD LSRPT 
002064 LSEXP4:: 
002064 000000 -WORD 0 
002066 LSEXPS:: 
002066 000000 «WORD 0 
002070 LSAUT:: sPTR. TO ADD UNIT CODE 
002070 022400 d LSAU 
002072 LSDUT:: sPTR. TO DROP UNIT CODE 
002072 022476 eWORD LSODU 
002074 LSLUN:: sLUN FOR EXERCISERS TO FILL 
002074 000000 F 0 
002076 LSDESP:: sPOINTER TO DIAG. DESCRIPTION 
002076 003342 WORD LSDESC 
002100 LSLOAD:: sGENERATE SPECIAL AUTOLOAD EMT 
002100 104035 EMT ESLOAD 
002102 LSETP:: sPOINTER TO ERRTBL 
002102 000000 -WORD 0 
83 LSICP:: :PTR. TO INIT CODE 

104 021602 -WORD LSINIT 
002106 LSCCP:: sPTR. TO CLEAN-UP CODE 
002106 022660 -WORD LSCLEAN 
002110 LSACP:: sPTR. TO AUTO CODE 
002110 022604 -WORD LSAUTO 
002112 LSPRT:: sPTR. TO PROTECT TABLE 
002112 021572 «WORD LSPROT 
002114 LSTEST:: sTEST NUMBER 
002114 000000 WORD 0 

116 LSDLY:: sDELAY COUNT 

116 000000 WORD 

120 LSHIME:: sPTR. TO HIGH HEM 
002120 000000 ~WORD 


eee 


a — — — — — — — — — — — — 


1 2 
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DEFAULT HARDWARE P-TABLE 


888 eSBTTL DEFAULT HARDWARE P-TABLE 


SEQ 21 












889 a 
890 : THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
891 : THE TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
3 4 IDENTICAL TO Tne STRUCTURE OF THE RUN-TIME P-TABLE. 
894 002122 F BGNHW ODFPTBL sDEFAULT HARD-P-TABLE 
002122 000003 -WORD 110000-LSHW/2 
002124 LSHW:: 
896 002124 172522 -WORD 172522 ; 2ND (OF 2) REGISTERS. 
897 poet es 000224 eWORD 2 3: INTERRUPT VECTOR 
898 0021 000240 eWORD PRIOS 3 INTERRUPT PRIORITY. 
899 002132 ENDHW 
002132 L1 : 
a -SBTTL SOFTWARE P-TABLE 
902 see 
903 THE SOFTWARE P-TABLE CONTAINS THE VALUES OF THE PROGRAM 
oes ;_PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR. 
906 002132 BGNSW 
002132 000004 -WORD P1O00T-L$Su/2 
002134 LSSW:: 
907 002134 SFPTBL:: 
908 002134 000000 TRANSTST:: eWORD 0 sENABLE RAM DUMP IF =1 
= 44 002136 000000 NOITS:: -WORD 0 : INHIBIT ia OPTION. 
911 s eeeNZ = INHIBIT ITERATE. 
912 002140 000031 -WORD 25. s LOCAL (PER TEST) ERROR LIMIT 
913 002142 000310 WORD . 3 GLOBAL (PER UNIT) ERROR LIMIT 
me 





— 
— 
Ly) 


- — — — — — 


—— — — — — —— ——— — — — 


CZTUWAO ym AS END PRT A 


SOFTWARE P- 


— 
S&S 


3 —% So 





2 wk 
— 
ands oOo 









: BIT DIFINITIONS 
BIT15== 100000 


B1T06== 


J 2 
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-SBTTL GLOBAL EQUATES SECTION 


-SBTTL GLOBAL EQUATES SECTION 


EQUALS 


100 


BITOS== 40 
BITO4== 20 
B1T03== 10 
BiTO2== 4 
BITOi== 2 
B1T00== 1 


: : EVENT FLAG DEFINITION 





; GET STANDARD EQUATES. 





; THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
ARE USED IN MORE THAN ONE TEST. 


ONS 
:  €F32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 


EF START 


EF .RESTART== 
EF .CONTINUE== 





EF .NEW== 
EF .PUR== 


PRIORITY LEVEL DEFINITIONS 


; START COMMAND WAS ISSUED 

RESTART COMMAND WAS ISSUED 

; CONTINUE COMMAND WAS ISSUED 
PASS HAS BEEN STARTED 





A NEW 
: , POWER-FAIL/POWER-UP OCCURRED 


SEG 22 





CZTUWAO TU8O FRONT END PRT A 


GLOBAL EQUATES SECTION 


949 
950 002144 





172516 


LLL LL eee 


K 2 
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PRIO7== 340 
PR106== 300 





= SDEFINE MEMORY MANAGEMENT REGISTERS 
.SBTTL MEMORY MANAGEMENT DEFINITIONS 
:@KT11 VECTOR ADDRESS 


MAVEC= 2 
s*KT11 STATUS REGISTER ADDRESSES 








SEQ 25 


——— — — — — — 






L 2 


CZTUWAO TUSO FRONT END PRT A MACRO MI 29-MAR- : - 
MEMORY MANAGEMENT DEFINITIONS — os 


SEQ 24 







UIPARG= 177654 
UIPARZ= 177656 
Z#USER "D'' PAGE ADDRESS REGISTERS 
UDPARO= 177660 


UDPAR6= 
UDPAR7= 177676 
~ENDC 

~ENDC 
oIF NB 

——* "I" PAGE DESCRIPTOR REGISTERS 






SIPDR6= 172214 
SIPDR?= 172216 
SeSUPERVISOR "D'’ PAGE DESCRIPTOR REGISTERS 


IF NB 
s@SUPERVISOR ‘D'’ PAGE ADDRESS REGISTERS 
SDPARI= 172262 

= 172264 


| 172266 
SDPAR4= 17227C ee ore 





—— — — — — — — — 
nh 2 


SEQ 25 
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CZTUWAO TUBO FRONT END PRT A 
MEMORY MANAGEMENT DEFINITIONS 









SDPARS= 172272 | 
SDPARG= 172274 
—" 172276 







-ENDC 
s*KERNEL ‘‘I‘* PAGE DESCRIPTOR REGISTERS 
PDRO= 172 


KI 

His a 

KIPDR3S= 172306 

ee 172310 
PDRS= este 


KIPDRG= 172314 
KIPDR?= 172316 


NB 
: SRERNEL "D'’ PAGE DESCRIPTOR REGISTERS 
KDPDRO= 1723520 


SER 





aw at 


— ed ed od 
PINTRINTNINT NI 
2222 
OfNOS 








KIPAR6= 172354 
KIPAR?= 172356 
sSKERNEL “DY PAGE ADDRESS REGISTERS 





— — —— — — ee — —— — — 


J 
’ 
— — — — — — — — — — ö ——— — —— — — — 


CZTUWAO TUSO FRON 


N 2 
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T END PR 
TU8O REGISTER AND PACKET DEFINITIONS 


955 


Segegsssesaeeegeteseg sss 


$38383sss 


So 
22 
~~ 


~SBTTL TUBO REGISTER AND PACKET DEFINITIONS 


: SOME GENERAL EQUATES. 


ERRVEC== 
TTIVEC== 
TTICSR== 177560 
TTIBFR== 177562 


POINTER TO ERROR VECTOR FOR BUS TIME OUT. 
; INTERRUPT VECTOR FOR CONSOLE INPUT 

; BUS ADDRESS OF CONSOLE INPUT 

CONSOLE INPUT DATA BUFFER 






34 
:BIT DEFINITIONS FOR TSSR REGISTER 


sc= BIT15 
BIE= BIT14 
SCE= = BIT13 
RMR= BITI2 
NXM= BIT11 
NBA= 81110 
HIADDR= BIT9!BITS 
SSR= 8117 


OFL= Bertie 
FATERR= B1T4!B1T5 
TERCLS= BITSiBit2!e171 


CIAL CONDITION 


mm@tc 
SRSeees 
x“ = 





NE BIT 
sFATAL TERMINATION ERROR CODES 
STERMINATION CODES 


al FOR EXTENDED STATUS REGISTER 0 


XSOTMK= B1T15 






XS0B0 
XSOEOT= BITO 


3¢ 


sTAPE MARK eS 





3¢ 
se aoe FOR EXTENDED STATUS REGISTER 1 


| 
SEQ 26 | 


TUBO REGISTER AND PACKET us 


lal —" ———_—_— — —_— ee a aie i , 4 


X1.DLT = B1T15 ;DATA LATE 
X1.SPARE= fe: ;NOT USED 
X1.COR = BIT13 ;CORRECTABLE DATA ERR 

X1.MBZ = = BIT 120111 sB1rt0vaiT9eBt ToBI ToeBLTS+BLT¢0811S0B11208110 sALWAYS 0 


X71 .RBP ARITY 
X1.UNC = BIT SUNCORRECTABLE DATA OR HARD ERROR 








3* 

“BIT DEFINITIONS FOR EXTENDED STATUS REGISTER 2 
3 (x$T2) 

X2.0PM = B1T15 
X2.RCE = BITI4 CHECKSUM 
XZ. SPARES ———— õof USED 


ie IN PROGRESS (TAPE MOVING) 
Y TUBO (ALWAYS=0) 





X2.WC 10 WRITE CLOCK FAILURE (FIFO NOT EMPTIED BY TRANSPORT) 
X2.EXTF = B1T7 :IF WRITE CHAR CMD THEN = EXTENDED FEATURES ENABLED 
X2.BUFE = B1T6 s1F WRITE CHAR CMD THEN = BUFFERING ENABLED 

X2.REV = 000077 sIF WRITE CHAR CMD THE MI ODE REVISION LEVEL 
X2.UNIT = BIT2+B1T1+B1T0 :1F GET STATUS THEN = CURRENTLY SELECTED UNIT NO. 


3* 
a ee FOR EXTENDED STATUS REGISTER 35 


X3.MDE = 177400 sMICRO-DIAGNOSTIC ERROR CODE 
ED BY TUSO 





X3.SPARE= 8117 sNOT USED BY 

x3. 4 = BIT6 OPERATION INCOMPLETE 

X3.REV = BITS s REVERSE 

x3. TRF = BIT4 3 TRANSPORT RESPONSE FAILURE 
X3.DCK = BITS DENSITY CHECK 

X3.MBZ =B1T2+BIT1 sNOT USED ALWAYS 0 


X3.RI6 = BITO REVERSE INTO BOT 


3+ 
ol Soars FOR EXTENDED STATUS REGISTER 4 


X4.HSP = BITI5 HIGH SPEED 
M4.RCE = BITI4 TRETRY COUNT EXCEEDED 

. = BIT13 TRANSPORT SPECIAL MCDE 
X4.MBZ = BIT12eBIT11+B1T10¢B1T9"B178 sNOT USED ALWAYS 0 
x4.WURC = 000577 ITE RETRY COUNT FIELD 





3* 


‘a TERMINATION CODES (BIT 0-2) 





TSREJ= 32 COMMAND REJECTED 
UNREC= 6 SUNRECOVERABLE ERROR 
+ 


“DEVICE REGISTER OFFSETS 


; 
— — —— — — — — — — 





CZTUWAO TUSO FRONT END PR 
Tu80 REGISTER AND PACKET ber INITIONS 


— 


el ls eel eld et el ed ee 8 ed el ed a ed ed ae ed = od 


et el th — —— — — ed — — — — — — — — — — ed ed od ot etd —— 
BRON “—Soaneusun—csan 232 


— td and ot =O — 








c 3 
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3* 
: TSDB ADDRESS BIT DEFINITIONS 
A1716 - BIT1+B1T0 


30 

> COMMAND DEFINITIONS 
P.GETSTAT 
P. INIT 

P. CONTROL 


P.FORMAT 
P.POSITION 
SUB 


o-wMuw 


ad BO ad ot od od od 


P.ACK = BIT! 
P.cvc = BIT 
P.OPP = BIT 
SWB = BIT 
= BIT! 


P .MODE 'BITIO!BIT9!BITS 
P.IE = 8 
P.FAT= BIT6!B1T5 
P.CMD = 37 


3* 
; CONTROL COMMAND MODE CODES 





PC RELEASE = 0*256. 
PC..REWIND = 1#256. 
PC .NOOP = 20256. 
PC. 1EREW = 4*256. 
PC .ERASE = $¢256. 


; ; CONTROLLER RAM DEFINITIONS 
RNCHBEG = 167 












;TSDB/TSBA REGISTER 
;TSDB/TSBA REGISTER 


i — — REGISTER HIGH BYTE 


;TSSR R 
:TSSR REGISTER HIGH BYTE 


sADDRESS BITS 17;16 ARE IN 1:0 


3GET STATUS 
s INITIALIZE 

CONTROL C 

sPOSITION 

; SUBSYSTEM WRITE 

WRIT 

SWKITE CHARACTERISTICS 
EAD 


WORD BIT DEFINITIONS 


sBUFFER AVAIL FOR CONTROLLER 
sCLEAR VOL 


UME C 
SREVERSE SEQUENCE OF DATA BITS 
SWAP BYTES IN MEMORY 
SEXTENDED COMMAND MODE FIELD 
2 INTERRUPT ENABL 
SPACKET HEADER —7E (ALWAYS=0) 
MAJOR COMMAND FIELD 














sRELEASE BUFFER 
s REWIND 


:NO-OP 
SREWIND IMMEDIATE INTERRUPT 
:SECURITY ERASE 










sCHARACTERISTICS 10 DATA BEGIN RAM ADDRESS 
fn MS 10 DATA END RAM ADDRESS 
;COMMAND PACKET BEGIN RAM ADDRESS 

;COMMAND PACKET END RAM ADDRESS 





— — —— — — — — — 


| 


CZTUWAO TUSO FRONT END 
TUBO REGISTER AND PACKE 
26 000117 
127 
: 
31 
32 
33 000006 
13% 000010 
35 000012 
136 000014 
37 000016 
38 
39 
40 
41 
4? 
43 
44 
45 
46 000002 
47 000004 
3 000006 
59 000010 
3 
54 
55 
— 
57 
58 
59 
60 


SS OOS OF tr te ty te te ty ty ty tet + eo 999 9 9 Sr et ed ed ed ed ed pow 
— 


à ed — ed ed ed ed ed eet ed we ed oe oo =n“ = 


SELSSFER 


11 
11 
1170 
He 
1173 
1174 
Hs 
Me 
1178 
1179 
ne 
He 








* 
* 
000004 
* 
000007 
sar 

; 
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T DEFINITIONS 


RMASGEND= 117 
4 


REGISTER DEFINITIONS IN THE MESSAGE BUFFER 


sMESSAGE BUFFER END RAM ADDRESS 


KSTO== 6 
MSTiz= 6. 
xST2== 10. 
xSTS== 12. 
MST4e= 14, 





* 


OFFSETS TO WORD LOCATIONS IN PACKET DEFINITIONS 


PKLOW = 2 LOW ORDER CHARACTERISTIC DATA POINTER 
PKHI = 4 HIGH ORDER CHARACTERISTIC DATA POINTER 
PKBCNT = 6 NUMBER OF BYTES IN DATA PACKET 
EXBCNT=10 NUMBER OF BYTES IN EXTENDED DATA PACKET 


3¢ 
DATA PACKET OFFSETS FOR WRITE SUBSYTEM COMMAND 


sBYTE 0 
sBYTE ; 





3* 
sBSELO SELECT CODES FOR WRITE SUBSYSTEM COMMAND 









POPRIPIAIRS = 8B NOUNS WIPO 
SUNS o—e 


ROTEST 15 
MICROTEST 11 


3¢ 
sBSEL1 CODES FOR WRITE TAPE CONTROL 
UC. IFAL = 17 4 ay = ile’ . ADU 7 


SEO 29 


AND 13 | 
T. TAPE STATUS (NOT SUPPORTED BY ALL TRANSPO © 


| 
| 


| 


| 
| 


















28 






SELSESERRSSSRLSSP ONL SSELS SES 


3 
1 
1 
1 
1 
1 
1 
1 
1 
7 
1 
1 
1 
1 
1 
1 
1 
1 
4 
1 
1 
3 
3 
i 
1 
1 
1 
1 
1 
4 
1 
1 
1 
4 
. 
| 
1 


SOnOuv£&wn—o 





tt et ed el 8 ed oe 8 eh et oe et 9 ed 
— 8228 


—RXXX 
— 


ee 4 
—3 





UWAD TU8O 





FRONT END 











oo 
So 


His «4H He & 


PRT A 


GISTER AND PACKET DEFINITIONS 
000100 


E 3 


SEG 30 
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WC.1OTAD = BIT6 ; - TRANSPORT ADDRESS BIT 0 
WC.11TAD = BITS 3 TRANSPORT ADDRE 71 
WC. ISRESY = BIT4 ; 

WC. IREW = @1T3 H 

WC. IRWU = Bil2 3 

WC .IFEN = BIT! : 

wC.1G0 = B1T0 3 

30 

sBSEL1 CODES FOR WRITE FORMAT 

if = 8117 sIMISP = HIGH SPEED 

uF = BIT6 sIWRT - WRITE 

age = BITS sIREV = REVERSE 

id 2 BIT4 sIWFA — WRITE FILE MARK 

Wf = B1T3 sIEDIT = EDIT 

wr = BIT2 4+ E - ERASE 

WF = BIT! RESVS - RESERVED #3 

wk = BIT0 — IRESV ~ RESEAVED *4 





2* 
sBSEL1 CODES FOR WRITE MISCELLANEOUS SUBCOMMAND 


= B17 INVERT SENSE OF EXTENDED te on SWITCH 
= BITS RESET FIFO AND INPUT PARITY ERRORR 

MS .RSTAPE = 8113 sRESET TAPE STATUS f. FLIP-FLOPS 

= 61T2!B1T1 SATTENTION TRIGGER FIELD 

= B1T0 SRESET TIMER A,@ THEN DELAY TIMES IN SEL2 








sNO-OP (NOTHING TRIGGERED) 
SSIMULATE ON-LINE/OFF-LINE TRANSISTION 

MSA.NRAM= 202 SFORCE NON-FATAL RAM ERROR (FORCES ERRCODE 54) 
MSA.FRAM= Sez sFORCE FATAL RAM ERROR (CAUSES SCE TO SET) 


; WRITE SUBSYSTEM WRITE NPR BSEL1 BIT DEFINITIONS 








WP .IR = 8117 INTERRUPT REQUEST (0-1 a — 

NP.OUT = BIT6 sTAPE DATA DIRECTION OUT (O0= IN) 

NP .LOOP = 67T5 SENABLE TRANSPORT LOOPBACK 

NP.WRP = BIT4 SWRITE CORRECT PARITY (SET=0 TO WRITE WRONG) 





3¢ 
: READ STATUS MESSAGE BUFFER BIT DEFINITIONS 














= B1T7 sWORD #9 BYTE 2 DATA IN MISS 

= BIT6 ; ILW 

= BITS 3 OUT RDY H 

= BIT4 $ IN RDY H 

= BITS : TIMER A FLAG 

= 3112 : TIMER B FLAG M 

= BIT1+BI1TO 3 (UNDEF I 

= B1T15 3s WORD oe XF 1 PARIN M 

= Bins ; IRESV2 

=F bd a = — — — 





—— — — — — — — — — 
— —— —— — — — — — — — 


CZTUWAO TUBO FRONT E 
Tu80 REGISTER AND PACKET ber INITIONS 











1240 010000 
1241 004000 
1 002000 
1 001000 
1244 000400 
1245 000200 
1246 000100 
12467 000040 
1 000020 
1249 000010 
1250 000004 
1251 000002 
125 000001 
125 

1254 

1255 177560 
1256 562 
1 177564 
1 177566 
1259 007776 
1260 

1261 174400 
* 174402 
126 174404 
1264 174406 
1265 

1266 

1267 

1268 000004 
1269 000006 
1270 000010 
1271 000014 
1272 000016 
1275 

1274 000001 
1275 000013 
1276 177730 
1277 000006 
1278 000177 
1279 100200 
1280 

1281 177560 
** 177562 
128 177564 
1284 177566 
1285 


$1. 1601 


$1. 1IDENT 


$0. IFPT 








@Ooawoorowoorq 22a 
od me 
a 


2174406 


F 3 
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0 
KEYBORD STUFF FOR MOVER 
wilt 





CONTROLLER COMMANDS 


TTICSR 
TTIBFR 
TTOCSR 
TTOBFR 





2m << 
& 

z==—r 
x 


mene De Bene ee mo 
Reh 
233° 


; WORD #8 BYTE 0 


a Ad 
S283 

erererererorts 
=x 


= 
* 


> Se Ge Ge Ge Se Ge Ge Ge Ge Ge Ge Se 
— — — — — — — — 
es ee | 
vV@ 
a 


s KEYBOARD ore REGISTER 
YBOARD DAT G 


KE A REGISTER 
CONSOLE PRINTER STATUS REGISTER 
; CONSOLE PRINTER DATA REGISTER 
sHIGH MEMORY MASK VALUE 


sSTATUS AND CONTROL REGISTER 
DL ADDRESS REGISTER 
SPLATTER ADDRESS 
MULTIPURPOSE REGISTER 





sGET STATUS COMMAND 
SEEK TRACK AND HEAD SELECT 
READ SECTOR HEADER 


sREAD COMMAND 

SREAD SECTOR NO HEADER CHECK 
DRIVE READY BIT IN STATUS REG. 
SSTATUS AND RESET 
MASK FOR COVER OPEN 
sHEADS UNLOADED 
sMASK FOR CYLINDER 




















ADDRESS 
DONE SET OR ERROR SET BITS 


sKEYBOARD INPUT STATUS 
sKEYBOARD DATA REGISTER 

CONSOLE PRINTER STATUS REGISTER 
SCONSOLE PRINTER DATA REGISTER 





SEQ 51 


— — — — 


mee 
| 6 3 
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SPECIAL MACROS AND OPDEFS. 
1287 ~SBTTL SPECIAL MACROS AND OPDEFS. 


— as 
~™ 
8 


3* 
sSAVE GENERAL REGS 1 TO 5 


-MACRO SAVREG 
JSR R5 ,REGSAV 
NDA 


3¢ 
; MACRO TO FORCE AN ERROR 


-MACRO FORCERROR TAG, NOTSSR 

-11F NDF LISTALL, .NLIST 

IF B NOTSSR 

J MOV TSSRCRS) RI sREAD TSSR 

’ MOV FORCER,FORCER s1S FORCER SET? (LEAVE C BIT ALONE) 
BNE TAG SBR IF YES 


oNLIST 
olIF NDF LISTALL, .LIST 
LIST 









3+ 

: MACRO TO FORCE AN EXIT TO AVOID SECTION ITERATIONS 

‘ WILL EXIT TO A LABEL IF FORCER IS NEGATIVE 

: SO TO FORCE S AND EXIT ON 1 ERROR SET 

: FORCER TO 1 

: TO FORCE ERRORS AND ITERATIONS SET FORCER TO 1. 

-MACRO FORCEXIT TAG 

oNLIST 

re ay LISTALL, .WLIST 
MOV FORCER ,FORCER 31S FORCER NEGATIVE? 
BAI TAG :BR IF YES 


See —— 


oNLIST 
oLIF NDF LISTALL, .LIST 
LIST 


iw 
-_ 


3* 

: MACRO TO INCREMENT ERROR COUNTS 

-RACRO NEXT.ERRNO 

; F ĩie NDF LISTALL, .NLIST 
ERRNO=ERRNO* 

LIF NOF LISTALL, .LIST 


4 
88 





— 


el et ee ee — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — ed — — — ed — ed — — — — — — — ed — — 


——— —— 


————— — — ç — — — — —— 


— — — — — 


re 


H 3 
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an 
— 
⸗ 
Rr 
⸗ 
m 
Sa 





CIAL MACROS AND OPDEF 
1344 sMACRO TO PERFORM XOR 
1345 + 
1346 
1347 -MACRO XOR A.B 
1348 MOV A,-\5P) 
1349 BIC B, (SP) 
1350 BIC A.B 
1351 BIS (SP)+.B8 
1352 E 
1353 
1354 000000 EN=0 ; INITIALIZE ERROR NUMBER 
1355 SBTTL FORCER = FORCE ERROR FLAG 
15 
1358 THE FOLLOWING LOCATIONS MAY BE PATCHED BY THE USER 
1359 : TO OBTAIN THE RESULTS DESCRIBED FOR EACH. 
1361 
1362 002144 000000 FORCER:: 0 s FORCE TYPE ALL HARD ERRORS (THE ONES CALLED - 
1363 3; @ BY THE MACRO “‘IFERROR’’). AN ERROR NEED NOT 
8 : - EXIST, JUST ASSUME AND TYPE THE MESSAGE. 
1366 
1367 


SEQ 35 


— — — — 
LE — — 







1 


> — 


“Ss 
“~ 





X 
o 





Stott 
SHVSSRRESELES 


i 


: EEE scceeesesqceets 
&- 


SESeaRRes 
—— 


369 
70 
He 
37 
375 
76 
378 
79 
is 
i 
a 
388 
389 
i 
359% 
395 
39% 
zn 
399 
400 
401 
fs 
404 
405 
406 
407 
408 


ee eee —— — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — 


22 
oon 





CZTUWAO TUBO FRONT END PRT A 
GLOBAL DATA SECTION 





— — — —— — — — 


13 
SEQ 54 
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-SBTTL GLOBAL DATA SECTION 


344 
THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
IN MORE THAN ONE TEST. 


“THE FOLLOWING DATA ARE SET FOR EACH UNIT AT INIT TIME. 
“SINGLE UNIT DEFAULTS (LISTED) ARE IN THE DEFAULT P-TABLE. 



























EPRTSW:: -WORD 0 sPRINT SWITCH 
UNITN:: -WORD 0 SUNIT @ UNDER TEST. 
QVP:: eWORD 0 sQUICK VERIFY FLAG. 
Cc $3 eWORD 0 sADDRESS OF CSR FOR CURRENT DEVICE 
IVEC:: eWORD 224 3 T VECTOR 
IPRI:: WORD PRIO4 3 ORITY. 
TSTCNT:: WORD O sNUMBER OF TESTS RUN IN THIS PASS 
LOOPCNT: : eWORD 0 sREMAINING ITERATION COUNT FOR TEST 
DEVCNT:: WORD 0 sNUMBER OF DEVICE UNDER TEST 
FATFLG:: eWORD 0 sSET IF FATAL ERROR IS DETECTED IN TEST 
INTRECV:: eWORD 0 3 INTERRUPT WAS RECEIVED 
2: -WORD 0 
eWORD 0 
eWORD 0 
WORD 0 $ ADDRESS MEMORY ERROR 
-WORD 0 sLUW ADDRESS RMERORY ERROR 
-BLKU 16. sDATA READ FROM RAM PACKET OR MESSAGE BUF AREA 
-WORD 0 sRAM DATA SIZE FOR PRAMPKT ROUTINE 
eWORD 0 RECEIVED BUFFER HIGH ADDRESS 
WORD 0 
WORD 0 
WORD 0 
-WORD 0 
-WORD 0 ; POINTER 
eWORD 0 SPRINT ROUTINE TEMP 
-BL«KB 100. sEXPECTED MESSAGE BUFFER DATA 
-BLKB 100. sRECEIVED MESSAGE BUFFER DATA 
-BLKB 80. sTEMPORARY STORAGE FOR PRINT 
WORD 0 sSTORES ADDRESS OF MESSAGE BUFFER FOR ERR PRT 


J 
————— — ——— ——— — — — — 


nn 


— — — — 


CZTUWAO TUSO FRONT END PRT A 
- TEST DATA TABLE 


TSTBLK 





010000 





ess 


se 


J 3 
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ied 


~SBTTL TSTBLK = TEST DATA TABLE 


3* 


“THIS TABLE CONTAINS TEST DATA USED IN SEVERAL TESTS 


IN SEQUENCE THE DATA IS: 
ALL ZEROS 
ONES 





WALKING ONES 
WALKING ZEROS 
ALTERNATING ONES AND ZEROS 









TBLEND==. 





sALL ZEROS 
sALL ONES 
sDATA FOR WALKING ONES 


sDATA FOR WALKING ZEROS 


sALTERNATING ONES, ZEROS 
sALTERNATING ONES, ZERO OPPOSITE FROM ABOVE 


SEQ 35 


' 
— — — — — — 


CZTUWAC TUBO FRONT END PRT A 
ORAGE 


GLOBAL 


— — ed ed ond od ets — ed aed = 


V 
— a es 
Ls ) 


SEsesssssy 





ENVIRONMENT ST 





003332 


> 
3 


Kk 3 
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000000 DUMMY: 


KTFLG:: 


KTENABLE: : 











@e Qe Se Ge Ge Ge Ge Ge Oe 
cunt 


iF 


SKIPT: 





— — eee ell — — — — 


.Satri GLOBAL ENVIRONMENT STORAGE 
“STORAGE FOR DEVICE REGISTERS 


— 





ABE 
ERROR STATISTICS TABLE 


ead 


sDUMMY DEVICE REGISTERS... 


geeeFOR MULTI-UNIT CHECKOUT. 


"DROPPED UNIT’’ FLAG. 
;INHIBITS CODE IN 'CLEAN-UP’’. 
sFLAG TO SAY NO DEVICE. 
sSOME TEMP LOCATIONS. 


sXXDP+ COMM BLOCK POINTER. 





WORD 


- WORD 
3 = NZ = >24K AND 


<24K OR NO KT - 


SEQ 56 


‘s BY TEST ROUT INES TO FLAG >28K UNDER TEST 


2W BLOCK ADDRESS FOR 32K START 


SACTUAL DATA 
sEXPECTED DATA 


; CONFIGURATION TABLES. 
sCONFIG WORK. 


sEND OF MEM TABLE. 


(1 WORD PER UNIT). 64 UNITS MAX: 







UNIT NOT TESTED 
UNIT ONLINE, 





UNIT DROPPED, 





NO ERRORS 
UNIT ONLINE, ENCOUNTERED XXXX ERRORS 
UNIT DROPPED, a tee at oo REGISTER 


T IDLE AT STAR 
UNIT DROPPED. ENCOUNTERED xxxx " ERRORS 


64. 
0 


s1=SKIP SUBTEST O=NO SKIP OF SUBTEST 


—a — — — — — — 


L. 2 
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GLOBAL TEXT MESSAGES 


$eQ 37 





1514 * ASarti GLOBAL TEXT MESSAGES 
1516 : THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, | 
1517 ; MESSAGES, AND ASCII! INFORMATION THAT ARE USED IN | 
1518 : MORE THAN ONE TES!. | 
1 ‘ 
1351 
13¢¢ 
15235 3* 
1526 “NAMES OF DEVICES SUPPORTED 
1526 J 
1527 003334 DEVTYP <TU80> 

003334 LSDVTYP:: 

003334 124 125 070 ,ASCI2Z /TU80/ 

EVEN 

18 
1380 3* 
“TEST DESCRIPTION 
1338 003342 , DESCRIPT <CZTUWAO TU8O FRONT END PRT A> 

003342 LSDESC:: 

003342 103 132 124 +ASCIZ /CZTUWAO TUBO FRONT END PRT A/ 


3¢ 
:BIT TO ASCII CONVERSION FOR TSSR REGISTER 







FeESESSLELE 
2 

















3400 3440 003443 003447 TSSRBIT:: 1$,2$,3$,4$,5$,6$.7$.8$ 
20 003501 003505 003511 9$.10$,11$, 12$, 138, 14$,15$, 168 
123 103 66 13 ASCIZ 

3 102 111 105 28: -ASCI2 

? 123 103 105 3S: ASCI2 | 

53 122 115 122 4$: -ASCIZ 
1545 00657 «116180 1NS S82 ASCHZ | 
1546 00 116 102 101 6$: ASCIZ | 
1547 003467 102 111 124 7$: ASCIZ 
1548 003474 102 111 124 8$: ASCIZ 
1549 3501 123 123 122 9S: ASCIZ 
1556 117 106 114 10$: .ASCIZ 
1 31 517 102 111 126 11%:  .ASCIZ 
15 516 102 111 124 12$:  .ASCIZ 
155 & 102 111 124 138:  .ASCIZ | 
1554 0035 102 11 124 14$: .ASCIZ 
1555 003535 102 111 124 15$:  .ASCIZ 
1556 542 102 111 124 16$:  .ASCIZ : 
155 EVEN | 
1558 50 124 123 123 SFIERR: .ASCIZ ‘TSSR ERROR AFTER SOFT INIT’ 
1559 124 123 123 SFHERR: .ASCIZ ‘TSSR ERROR AFTER BUS RESET’ | 
1560 00 040 040 116 WER:  .ASCIZ / WON-EXISTANT DEVICE REGISTER/ | 
1561 75 045 101 040 WRX: .ASCIZ /%A ADDRESS: 206/ | 
1568 6 045 101 040 TSSX:  .ASCI1 /%A TSBA,TSSR EXP'D: ZO6ZA,Z062N/ | 
1 045 101 040 "ASCIZ /ZA TSBA.TSSR REC'D: 206%A,206/ | 
1564 004015 045 116 045 FUSI: Cll /2NZA/ ; re 





— 


CZTUWAO TUSO FRONT 
GLOBAL TEXT MESSAGES 





aeSeESEE 
é 


Mw 
~i 
* 


⸗sÄses283828 
2 
= 


ed ed ed ced lh ed ed et eet eed oe ed oe nd ae ed oe oe os os os 
We nr 
co 
~ 


w 
8 






040 


END PRT A 


040 
0 





—— ae ————— 
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3232222223 
MNO — 


z 






/ UNEXPECTED INTERRUPT/ 
Py A B EXPECTED, NOT RECEIVED/ 
/ WO INTERRUPT WAS GENERATED/ 
/ ANTERRUPT FAULT/ 

/3A 
/ 

/ 

/ 








Z06ZA TSBA: 306 / 

DIDN'T INITIALIZE CONTROLLER/ 
“SOFT<INIT’ DIDN'T INITIALIZE THE DOPU/ 
“BUS-RESET’’ DIDN'T INITIALIZE THE DPU/ 





4/ 


/iN/ 

‘KA EXP": Ra REC'D: %06/ 

/ZNZA EXP'D: ZO6ZA, ZOGENZA REC'D: ZOZA, 206/ 

/ZA REG(W) OORITTEN a ZO6ZA REG(R) READ; EXP'D: ZO6ZA, REC'D: 206/ 
eASCIZ ‘RAM renee s Do Not Match Packet Sent’ 

/ CONFIG SN°T MAT CH MFG. MASTER/ 

"WRITE CHARACTERISTICS Failed’ 

"TSSR Incorrect After WRITE Command, More Bits Set Than SSR° 

"TSSR Incorrect After READ Command, More Bits Set Than SSR’ 


SEQ 58 


: 
' 
—— —— — — — — — — — — — 


J 
OLE — — — — — 


CZTUWAO IVSO FRONT END PRT A 
GLOBAL ERROR REPORT SECTION 


1590 
91 


Sesseses 


—— —— —— 
oe 
~m-—o 

wr 

8* 


o 
= 


005256 
1613 005262 


013746 005062 
012746 003675 
318 000002 
104415 
062706 000006 
004737 005230 
104423 
005727 
000000 
001402 
004777 177770 
012746 004426 
012746 000001 
010600 
104415 
062706 000004 
000207 


n 3 
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~SBTTL GLOBAL ERROR REPORT SECTION 


zoe 
; THE 598 ERRO® REPORT — eee test. THE PRINTB AND PRINTX 


; CALLS THAT ARE USED IN MOR 
; ASCII TEXT STRINGS ARE FOUND IN THE GLOBAL TEXT SECTION. 


L10002: 


EXTEND: TST 
XTA: 0 


1$: 





JSR 
PRINTX 
MOV 


ADD 
RTS 


NXRERR 
#NXRX ,NODEV 
NOD 


#6,S 
PC ,EXTEND 


CSMSG 


(PC)+ 





sNON-EXISTANT DEVICE REGISTER. 
sNODEV = NEXM ADDRESS. 


; PRINT EXTENSION IF REQUIRED. 


THIS ROUTINE APPENDS A UNIQUE EXTENSION (CIF REQUIRED) 
TO ANY OF THE ABOVE ERROR SIGNATURES. 
; 0 = NO EXTENSION. 


; APPEND EXTENSION TEXT. 
; PRINT A BLANK LINE 


SEQ 59 


— — — — — — — 
— — —— 
— — — — —— 


——— — —— —— — — — — LS —— 


TA 


CZTUWAO TU8O FRONT END PR 
PRITSSR - PRIKT TSSR CONTENTS 





000054 


MACRO m 


177777 
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\SBTTL PRITSSR = PRINT TSSR CONTENTS 
:* 

“ROUTINE TO DISPLAY THE CONTENTS, AND BIT DEFINITIONS, OF 
“THE TSSR REGISTER. THIS ROUTINE IS NORMALLY CALLED ONLY 
:BY A MESSAGE PRINTING ROUTINE 
* INPUTS: 
: R1 CONTENTS OF TSSR 
* SUBORDINATE ROUTINES: 


CHKAMB CHECK FOR AMBIGUOUS CONTENTS 


PRITSSR: 
sSAVE GENERAL REGISTERS 
MOV R1,R4 SSAVE THE TSSR CONTENTS 
— #@TSSRFOR,R4 SPRINT THE CONTENTS OF TSSR 


MOV #TSSRFOR,-(SP) 
MOV 32 —* 


















MOV 
TRAP 
ADD 
mOV :GET TSSR BACK FOR CHKAMB 
JSR SARE CONTENTS AMBIGUOUS ? 
Bcs sBRANCH IF NOT 
PRINTX @AMBTSSR > SHOW CONTENTS ARE AMBIGUOUS 
MOV #ARBTSSR,-(SP) 
MOV #1,-(SP) 
MOV SP.RO 
TRAP gg 
ADD ° 
5$: MOV 3 R3 sCONTENTS OF TSSR 
BIC SMIADDR!FATERR!TERCLS.R3™ sCLEAR ALL MULTIPLE BIT FIELDS 
BEG 3NO BITS ARE SET 
MOV #TMPBFR.R2 s TEMPORARY ASCII BUFFER 
MOV #TSSRBIT.R1 ASCII EQUIVALENT OF BITS 
10$: TST R3 REMAINING BITS TO CONVERT 
BEO 15$ 5 H WHEN ALL ARE DONE 
cic sCLEAR CARRY FOR SHIFT 
R3 SHIFT NEXT BIT TO CARRY 
13$ BRANCH If BIT NOT SET 
(R1),RO POINTER TO BIT DEFINITION 
118: (RO)+, (R2)+ SMOVE ASCIZ 1 BUFFER 
138: )+ sPOINT TO NEXT DESCRIPTION 
3GE In] 
15$: 3s TERMINA 





CLRB Ss = (RZ) TE THE LINE 
PRINTX S#TSSDEF ,@TAPBFR SPRINT THE BIT DEFINITIONS 
MOV STAPBFR we) 






eas ll — — ——— — — — 


Cc 4 
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PRITSSR = PRINT TSSR CONTENTS 


SEQ 41 


012746 000002 #2,-(SP) 

010600 SP,RO 

106415 CSPNTX 

062706 000006 #6 .SP 

010403 20S: R4,RS sGET THE TSSR CONTENTS 

042703 177761 #°CTERCLS.R3 CLEAR ALL BUT TERMINATION 

016305 TCOCOD (RS) .RS :GET THE TERMINATION CODE MEANING 
10% ar: To R3 SPRINT THE TERMINATION CODE 














010403 R4,R3 sTSSR CONTENTS AGAIN 
062703 177717 #*CFATERR,R3 “CLEAR ALL BUT FATAL TERMINATION 
001421 25$ [DON’T PRINT IF ZERO 
006203 R3 
006203 R3 
006203 R3 SALINE TERMINATION CODE FOR INDEX 
016303 006552 TSFCOD(R3) .R3 “GET THE FATAL TERMINATION CODE 
STFCASC,R3” “PRINT THE FATAL TERMINATION CODE 
010346 MOV R3,-(SP) 
012746 006053 MOY ss @TFCASC,,-(SP) 
012746 000002 MOV #2,<(SP) 
010600 MOV SP,RO 
104415 TRAP COPUTX 
062706 000006 ADD 
012737 000031 002170 MOV 725° * PATFLG sDROP UNIT AFTER THIS ERROR 
" 25$: MOV R&R “GET TSSR CONTENTS 
176377 BIC #*CHIADDR,R3 SCLEAR ALL euT EXTENDED ADDRESS 
BEO [DON'T PRINT IF ZERO 
PRINT ATEXASC RS “PRINT THE EXTENDED ADDRESS BITS 
005751 MOV =« @TEXASC,-(SP) 
000002 mov 0s #2, =(S 
MOV SP,RO 
TRAP CSPNTX 
000006 ADD 86,SP 
100210 30s: CMP § #100210,R4 sCHECK FOR MEDIA ERROR 
BNE 31 “BR, IF PROBABLY NOT TAPE ERROR 
005672 002146 MOV GEPRTS EPRI'SY : PROBABLY MEDIA RELETED ERROR - BAD TAPE 
002146 31$: TST EPR “CHECK FOR THE SWITCH EMPTY 
BNE ad “BR, IF SWITCH IS NOT EMPTY 
005672 002146 MOV § BEPRT1,EPRTSW “SET SWITCH TO DEFAULT 
002146 005644 310$: MOV § EPRTSW, 32$¢2 “PUT REAL SWITCHABLE MESSAGE IN PLACE 
32$: PRINTB #EPRT “PRINT THE ERPOR MESSAGE 
005672 MOV = #EPRT1,-(SP) 
000001 MOV e~ § 
ROV SP,RO 
TRAP CSPNTB 
000006 ADD 0—s«#4, SP 
005672 002146 MOV SEPRT1 EPRTSU RESET TO NORMAL ERROR POINTER 
RTS PC RETURN TO CALLER 





EPRT2: — — 





—— —— — — 
— — — — 


OEE —— ——— — — — — — 


d 4 
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PRITSSR - PRINT TSSR CONTENTS 


ge ese 


SEO 42 


EPRT3: 

691 0056 045 116 045 EPRT1: .ASCIZ ‘ZNZA err vee © M74S54eeeeeZS' 

1 005731 045 116 045 TSSRFOR: eASCIZ ‘ZNZA TSSR = 206° 

1693 005751 045 116 045 TEXASC: eASCIZ ‘“ZNZA Extended Address Bits = 206‘ 
1694 8 045 116 045 TCOASC: eAStiZ ‘ZNZA Termination Class Code = IT‘ 
1695 00605 045 116 045 TFCASC: eASCIZ ‘“ZNZA fatal Termination Class Code = 2T° 
1696 006122 045 116 045 TSSDEF: eASCIZ ‘SZNZA TSSR Bits Set: 11 

8 006151 045 116 045 AMBTSSR oe eASCIZ ‘SZNZA TSSR Contents Are Ambiguous’ 
1699 006212 006232 006255 006303 TCOCOP: .WORD 18 28. 38,48.98.66.73 08 

1760 J 16 157 162 1$: eASCIZ ‘Normal Terminati 

1701 124 145 162 eASCIZ A— —— Condition’ 

* 006303 124 141 160 3S: eASCIZ ‘Tape Status Alert’ 
1703 006325 106 165 156 4$: ASCIZ ‘Function Reject’ 
1704 006345 122 145 145 58: -ASCIZ ‘Recoverable Error - Tape Position One Record Down’ 
1705 006427 122 145 143 : -ASCIZ ‘Recoverable Error - Tape Was Not Moved’ 
1706 006476 125 156 162 7$: eASCIZ ‘Unrecoverable Error’ 
1707 006522 106 1461 164 8$: eASCIZ ‘Fatat Controller Error’ 
i” EVEN 
1710 006552 006562 006616 006627 TSFCOD: .WORD 1$,28,3$, 
1711 006562 111 156 164 1$: “ASCIZ ‘Internal ; Failure’ 
1712 006616 122 145 163 2S: eASCIZ ‘Reserved‘ 
1713 006627 102 165 163 3S: eASCIZ ‘Bus Interface or Sanity Check Error’ 
4. 006673 122 145 163 4$: —— *"Reserved' 


—_— — — — 
— — 


— — — 
— ——— —— — — — — — — — — — 
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1717 
1718 
1719 
1720 
1721 
\ree 
1734 
1748 
1747 006704 
1728 006704 
3 006710 
1730 006712 003102 
1731 006716 
1 —88 3 
17335 006722 
1734 606724 010400 
1735 006 006100 
He 006 
1737 006 
006 01 
006 
736 012746 007110 
000003 
7 1 
706 000010 
7? 020106 
007052 
000005 
706 000010 
007145 
000001 
000004 
116 
116 
116 
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PRIPKT = PRINT THE ADDRESS/CONTENTS OF COMMAND PACKET 


-SBTTL PRIPKT 


- PRINT THE ADDRESS/CONTENTS OF COMMAND PACKET 


THIS ROUTINE PRINTS THE ADDRESS AND CONTENTS OF A COMMAND PACKET. 


3 RO 

: Rr3 

; Ray 

$ NOTE: 

PRIPKT:: 
SAVREG 


10$: 


15$: 


ea 
ara 
r 
= 
@ 





Par i =< ow — 
S585 SSS sSSSS8 se 5SSCRaE 
~4 
fs) 


On p> 
CEE tt AEE EEE 
=z 
— 





an 





RTS 
045 PKTFRA: .ASC 
045 PKTADD: .ASC 
045 PKTNEW: “ASC 








I 
301 
I 
N 





Z 
Z 
Z 


THIS ROUTINE 1S NORMALLY ONLY CALLED FROM A PRINT ROUTINE. 
NUMBER OF WORDS IN PACKET 


HIGH ORDER COMMAND PACKET ADDRESS 
ADDRESS OF COMMAND PACK 
R3 IS IGNORED IF THE KTENABLE FLAG IS CLEAR. 














sSAVE THE REGISTERS 

;SAVE NO. OF WORDS IN PACKET 
sABOVE 28K UNDER TEST? 

;BR IF YES 
3SET HIGH ORDER ADDRESS TO 0 
;COPY HIGH ORDER ADDRESS 
GET LOWER ADDRESS 

;SHIFT BIT 15 INTO C BIT 
AND INTO HIGH ORDER. 

SPRINT PACKET ADDRESS 









sGET HIGH ORDER ADDRESS 
NOT ABOVE 


T 
GET LOW ORDER ADDRESS 
SETUP PAR6 MAPPING FOR 18 BIT ADDRESS 
7GET RETURNED PAR6 ADDRESS BIAS 


sSAVE WORD NUMBER 
GET PACKET CONTENTS 
sPRINT THE DATA 











sNEXT WORD NUMBER 
DONE ALL PACKET WORDS? 
SLOOP TILL 


ALL DONE 
sJUST A COUPLE NEW LINES 


; RETURN 
* Packet Word #ZD1ZA = 206° 


_ RNZA Packet Address = 201205° 
*ZNZNZA 








— — — —— 


SEQ 43 


CZTUWAO TUSO FRONT END PRT A 


1757 
1 


1771 


gauge 
FERSS 
oS 
o 
3 
aa 


012700 177400 
04 


S8SSISISIFIII3 


— — — — ———2— 
Sssssssss 
ps 
ene 


aw 
fw 
vats 


010246 

012746 007240 
20 46 000004 
007224 
007226 
007250 062706 000012 


7 007240 045 116 045 





— — — — — — —— 
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MACRO M1200 29-MAR-83 15:24 PAGE 24 
PRIBXOR - PRINT EXPD, RECV AND XOR BYTE 


-SBTTL PRIBXOR - PRINT EXPD, RECV AND XOR BYTE 


30 


“PRINT EXPECTED DATA, RECEIVED DATA, AND XOR OF THE DATA BYTE 
“THIS ROUTINE 1S NORMALLY CALLED ONLY FOR PRINT ROUTINES. 


3 INPUTS: 

ee zun 

OUTPUT: 

RO KOR OF EXPECTED/RECEIVED DATA 


sSAVE THE REGISTERS 
R2,R3 SEXPECTED DATA 
R1,R3 FORM THE EXCLUSIVE OR 
#*C<377>,R0 sBYTE 
RO,RI : 
RO,R2 [SAVE LOW BYTE EXPD 
RO,R “SAVE LOW BYTE XOR 
#ORBEOR,R2.R1 RS SPRINT THE MESSAGE 















MOV ° 

MOV 

MOV 

MOV XORBF OR ,- (SP) 

ROV (SP) 

MOV 

TRAP 

ADD 

MOV 3RO HAS XOR ON RETURN 

RTS sRETURN TO CALLER 
XORBF OR : eASCIZ ‘“ZNZA EXPD: ZO3ZA RECV: ZO3SZA XOR: 203° 


SEQ 44 





CZTUWAO TUSO FRONT END PRT A 


3 


SIZSFS2 


sit 


1815 


00 
1814 007352 
1815 007354 


1816 
1817 007356 
1818 


007356 
000004 
000012 


116 


rs 
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MACRO M1200 29-MAR-835 15:24 PAGE 25 
PRIXOR = PRINT EXPD, RECV AND XOR 


-SBTTL PRIXOR = PRINT EXPD, RECV AND XOR 


- 


SPRINT EXPECTED DATA, RECEIVED DATA, AND XOR OF THE T 
:THIS ROUTINE IS NORMALLY CALLED ONLY FOR PRINT ROUTINES. 


: INPUTS: 


: RI RECEIVED DATA 

: R2 EXPECTED DATA 

OUTPUT: 

: RO MOR OF EXPECTED/RECEIVED DATA 







sSAVE THE — 
R2,R3 sEXPECT ED D 

R1,R3 sFORM THE EXCLUSIVE OR 
SKORFOR-R2.R1 oR3 PRINT THE MESSAGE 


R3,RO :RO HAS XOR ON RETURN 
PC sRETURN TO CALLER 





045 XORFOR: roy "ZNZA EXPD: ZO6ZA RECV: ZO6ZA XOR: 206° 


SEQ 45 


— — 2 ™ — — — 


— - — — — — — — 


H 4 


CZTUWAO TUBO FRONT END PRT A MACRO M1200 29-MAR-83 15:24 PAGE 26 
PRIEQU = PRINT BIT NUMBERS AS ASCII EQUIVALENT 


SEQ 46 





-SBTTL PRIEQU - PRINT BIT NUMBERS AS ASCII EQUIVALENT 


¢ 


ROUTINE TO CONVERT BIT VALUES TO ASCII AND PRINT THE STRING 
sTHIS ROUTINE IS NORMALLY CALLED FROM A PRINT ROUTINE 











) INPUTS : 
1 RO OCTAL VALUE TO CONVERT 
1s R1 TABLE OF POINTERS TO ASCII EQUIVALENT 
1 o 
1833 
1834 007424 PRIEQU: 
1835 007424 SAVREG sSAVE THE REGISTERS 
1s 007430 000207 RTS PC sRETURN TO CALLER 
1838 
1839 
1840 
Hy +4 -SBTTL PRIRAM = PRINT RAM ADDRESS 
3* 
184 
1844 sPRINT CONTROLLER RAM ADDRESS. 
—* niẽ ROUTINE IS NORMALLY CALLED ONLY FROM PRINT ROUTINES. 
1847 < INPUTS: 
1848 ; 
1849 : Re RAM ADDRESS 
1850 : 
1851 = 
1852 007432 PRIRAM: 
185 sSAVE R1-R5 UNTIL NEXT RETURN 
1854 sPRINT RAM ADDRESS IN ERROR 
4 010446 
440 012746 007462 
012746 000002 
010600 
104414 
007454 062706 000006 ADD 86 
1855 007460 000207 RTS PE sRETURN 


18 
185" 007462 045 116 045 RAAFOR: omit *ZNZA CONTROLLER RAM ADDRESS = 206° 


SBTITL PRIADD - PRINT MEMORY ERROR ADDRESS 
SPRINT MEMORY ADDRESS 
sTHIS ROUTINE 1S NORMALLY CALLED ONLY FROM PRINT ROUTINES. 
: IMPLICIT INPUTS 
ERRHI = WIGH ORDER ADDRESS 





e @e @e @e Ge Ge Ge Ge Ge 
> 





— — — — — — — — — 


I 4 


CZTUWAD TUBO FRONT END PRT A MACRO M1200 29-MAR-83 15:24 PAGE 26-1 
ERROR ADDRESS 








PRIADD = PRINT MEMORY 





1871 3 
be 32 
187% 83 — SAVREG sSAVE Ri-RS UNTIL NEXT RETURN 
L WEX 
1875 0075 013700 002202 MOV ERRWi RO GET HIGH ADDRESSS 
1876 0075 013701 002264 40V ERRLO,R1 GET LOW 
1877 007540 010102 MOV R1,R2 :COPY LOW ADDRESS 
1878 007542 101 ROL : SHIFT Bilt 15 TO t BIT 
1879 007544 1 ROL RO sSHIFT INTO HIGH ORDER 
1880 007546 PRINTB #PRIAO, ‘— SPRINT MEMORY ADDRESS IN ERROR 
010246 MOV ( SP) 
007550 010046 MOV 
007552 012746 007574 MOV 
007556 012746 000003 MOV 
007562 01 "OV 
007564 104414 TRAP 
007566 062706 000010 ADD 
ies 007572 000207 RTS sRETURN 
Hh 007574 045 116 045 PRIAO: coy "ZENZA MEMORY ERROR ADDRESS = %012%05° 





x -SBTTL PRITADD - PRINT MEMORY TEST ADDRESS 





SPRINT MEMORY ADDRESS 
“THIS ROUTINE 1S NORMALLY CALLED ONLY FROM PRINT ROUTINES. 


IMPLICIT INPUTS 
ERRH] = HIGH ORDER ADDRESS 









ERRLO — LOW ORDER ADDRESS 
PRITADD: 
SAVREG sSAVE R1-R5 UNTIL NEXT RETURN 
aoy 3GET ry ADDRESSS 
MOY GET L ADDRESS 
ROY sCOPY LOW ADDRESS 
ROL SHIFT Blt 15 TO C BIT 
ROL RO SHIFT INTO HIGH ORDER 
aa arte oe sPRINT MEMORY ADDRESS IN ERROR 
ROV RO,-(SP) 
May #PRITO,-(SP) 
MOV 7 (SP) 
BOY ⸗ 
TRAP cSPNTB 
* 4 ead 


RTS ; RETURN 
045 PRITO: roy INEA MEMORY TEST ADDRESS = 201205" 


SEQ 47 





— — —— — — — — 


J 4 
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SPACE = SPACE RECORDS (FORWARD AND REVERSE) COMMAND 


-SBTTL SPACE 


SEQ 48 





- SPACE RECORDS (FORWARD AND REVERSE) COMMAND 
;* 


TROUT INE TO ISSUE A SPACE RECORDS 
; COMMAND (FORWARD OR REVERSE) 


$ INPUT : 
Ra NUMBER OF RECORDS TO BE SPACED OVER 
B1T15 CONTROLS DIRECTION 
B1T15 = 0 I 
BIT1S = 1 IS REVERSE 
RS FIRST DEVICE UNIBUS ADDRESS 
REQUIRES A WRITE CHARACTERISTICS DONE PREVIOUSLY 
sQUTPUT: 


CARRY SET = SPACE RECORDS COMMAND OK 
CLR = SPACE RECORDS FAILED 


RO THE CONTENTS OF R4 IS MOVED TO RO 


IMPLICIT OUTPUT: 
TAPE HAS SEEN MOVED 
SIDE EFFECTS: 


@e Ge Ge Ge Ge Ge Se Ge Se Ge Ge Ge Ge Ge Ge Ge Se 4 SS SS GSO Ge Ge Gi Ge Ge 


















010054 
010060 001 395 
























1946 007752 SPACE: : 
1947 007752 SAVREG sSAVE THE GENERAL REGISTERS 
1948 0077 012737 000764 010150 may SET UP DELAY 
1949 007764 012737 140010 010140 UP COMMAND. SPACE FORWARD 
1950 007772 005703 TST DIRECTION 
1951 007774 1 BM! REVERSE INDICATED 

60 010337 010142 RCV NUMBER OF RECORDS TO SPACE 
#953 010002 000407 @R 

01 042703 100000 5$: BIC IRECTION BIT 
1955 010010 010337 010142 HOV NUMBER OF RECORDS TO SPACE 
1956 010014 re Led 000400 010140 1T IN COMMAND PACKET 
1957 0 012704 010140 108: H PACKET ADDRESS 
1958 01 010465 177776 
1959 91 004737 016740 15$: 
1960 010036 103420 SR IS SET AND OK 
1961 010040 ABOUT .25 SECONDS 

010040 000000 000250 _er 

013727 002116 _" 


-6(PC) 
—* 


_— iii — — — — — 





CZTUWAO TUSO FRONT END 9 A MACRO A 
SPACE <= SPACE 


124 
1974 010124 
1975 010126 
1976 
1977 
1978 
1980 010130 
1982 
1983 
1984 010140 
1986 010142 


kK 4 
M1200 29-MAR-83 13:24 PAGE 27-1 








RECORDS (FORWARD AND REVERSE) COMMAND 
005367 177756 ~22(PC) 
001367 BNE * 
005337 010150 DEC SDELAY 
001356 BNE 158 

11 BR 60$ 
016501 000000 208: MOV TSSR(RS) RI 
012702 000200 MOV #SSR,R2 
020201 25$: CMP R2,R1 
001401 BEO 40$ 
000402 BR 60$ 
000261 40$ SEC 

01 708 
000241 60$: CLC 

70$: 

010400 MOV R4,RO 
000207 RTS PC 


“PACKET FOR SPACE COMMAND 


-BLKB 4 0-< > -TUV2A87> 
: COMMAND WORD 








000000 WORD 
“NUMBER OF RECORDS TO BE SPACED 
000000 90$:  .WORD 
000000 s 
000000 - WORD 
000000 SDELAY: .WORD 0 
EVEN 


— eS — — — ——— — — —— — 


BUMP DELAY COUNTER DOWN 
BR, IF MORE DELAY 
4 fh If a CARRY = CLEAR 
;SET UP EXPECTED 

ARE THEY OK 
QUAL = OK 

E Exit 

+++ CARRY NO TROUBLE 
CARRY CLEAR = ERROR 


sPASS PACKET ADDRESS 
sRETURN 











OVER WORD 


sDELAY COUNTER 


SEQ 49 


— — — — — 


CZTUWAO TUSO FRONT END 
WRICHR = WRITE CHARACTERISTICS COMMAND 





L 4 
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~SBTTL WRTICHR — WRITE CHARACTERISTICS COMMAND 


:* 


ROUTINE TO ISSUE A WRITE CHARACTERISTICS 
: COMMAND SO THAT OTHER COMMANDS WILL GE ACCEPTED 


$ INPUT 

RS 53 OF PACKET FROM TEST 

RS FIRST DEVICE UNIBUS ADDRESS 

REQUIRES A CALL TO SOFINIT BE DONE PREVIOUSLY 
s OUTPUT: 

RO TSSR CONTENTS 

CARRY SET = WRITE CHARACTERISTICS COMMAND OK 

CLR - WRITE CHARACTERISTICS FAILED 

s IMPLICIT OUTPUT: 

MESSAGE BUFFER AND OTHER BUFFERS ALL SET UP 


SOFTWARE SWITCHES SET AS FOLLOWS: 
BENBSW = BUFFER ENABLE SWITCH ON OR OFF 


sSIDE EFFECTS: 


















WRTCHR: : 
SAVREG sSAVE THE GENERAL REGISTERS 
BENBSW SCLEAR BUFFER ENABLE SWITCH 
10S: R4, TSDB(RS) “SEND OUT COMMAND 
PC.CHKTSSR “WAIT FOR SSR 
208 “BR, IF SSR IS SET AND OK 
608 “BR IF TROUBLE CARRY = CLEAR 
208: TSSRCRS) RI READ 
#SSR,R2 SSET UP EXPECTED 
, “WAS OFF LINE SET IN TSSR 
25$ BR, IF NO OFL SE 
#OFLR2 “MAKE THEM LOOK ALIKE 
258: R2,R1 SARE THEY 
408 BR, IF EQUAL = OK 
60$ | STROUBLE EXIT 
408: #8, .R4 “POINT TO WRT CHARA DATA PACKET 
(R45 RB GET ADDRESS OF MESSAGE BUFFER 
R3,MESBFA “STORE FOR PRINT ROUTINES 
“SET CARRY NO TROUBLE 
70 EXIT 
60S: “CARRY CLEAR = ERROR 
708: TSSR(RS) ,RO ; RETURN TSSR CONTENTS 
PC * RETURN 








SEO 50 


— — -_- 


—— ee 


; 
— — — — — — — ö — ————— — — ——————————————————————————— [ = 


CZTUWAO TUSO FRONT END PRT A 


010350 
177776 


000550 
7? 016740 
000372 
002116 


177772 
177756 





— — — — 
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REWIND = POSITION TAPE (REWIND) COMMAND 


~SBTTL REWIND = POSITION TAPE (REWIND) COMMAND 


;THIS ROUTINE WILL REWIND THE SELECTED TAPE. 


CAUTION: THE ROUTINE DOES NOT WAIT FOR BOT 
TO ARRIVE. ALSO THE CALLER MUST CHECK FOR 
SSR TO SET IN THE TSSR 


; CALLING SEQUENCE : 
DO A SOFT IN 


IT 
DO A WRITE CHARACTERISTICS 
JSR PC REWIND 


Se @e Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ga Ge Ge Ge Gs Ge Ge Ge Ge Ge Ge 
Boe 
— 





RS FIRST DEVICE UNIBUS ADDRESS 
OUTPUT 
RO THE CONTENTS OF R4 IS PASSED TO RO 
REWIND: : 
SAVREG sSAVE R1-R5S UNTIL NEXT RETURN 
MOV #RUPACK .R4 GET PACKET ADDRES 
MOV R46, TSDB(RS) : SEND PACKET ADDRESS TO EXECUTE 
MOV #360. ,R3 sENOUGH TIME FOR 2400° REEL TO REWIND 
108: JSR PC ,WAITF T 
Bcs sé 208 
DELAY 250. 
Boy #250... (PC)* 
WORD 
BOY LSOLY,(PC)+ 
~ WORD 
DEC -6 (PC) 
BNE 74 
DEC =22(PC) 
BNE 720 
DEC R3 sBUMP COUNTER DOWN 
BNE 108 sKEEP GOING 
CLC sCLEAR CARRY TO SET ERROR 
208: MOV R4.RO PASS THE PACKET ADDRESS 
RTS PC *RE TURN 
-BLKB 10-<.-TUV2A87> 
RWPACK: 
WORD 102010 sPOSTION COMMAND (REWIND) 
-WORD 0 sNOT USED 


eee ————————— — — — 


SEQ 51 


— — — — 


— — — — — —— — 
— — — — ——— — — — 


— ——— — — — — — — 


— — — —— — 


’ 
TT 


CZTUWAO TUS8O FRONT END PRT A 


2109 


MIPIMI PO FRI RO RO PO RD 
— aot aot ood 
— — ee ed aed ed ed aed — 


21 

5197 010354 

2128 010354 
010360 


2129 010 

2130 010 

2131 0103 

338 010372 
2133 010376 
2134 010402 
2135 010406 
2136 010412 
2137 010416 
2138 010420 
2139 010422 
2140 010424 
2141 33*3 
2142 0104 

2143 010434 
2144 010436 
2145 010440 
2146 010442 
2147 010444 
2148 010446 


002206 
000020 


017054 
017054 
177777 


017054 
177776 


000027 


000010 002246 





N 4 
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CKRAM = COMPARE RAM TO 1/0 PACKET 


-SBTTL CKRAM = COMPARE RAM TO 1/0 PACKET 


4* 


“ROUTINE TO READ THt FIRST 8 BYTES FROM RAM 
MEMORY AND COMPARE THIS DATA TO A COMMAND PACKET. 
: INPUT: 


: R4 ADDRESS OF THE COMMAND PACKET 

: RS FIRST DEVICE UNIBUS ADDRESS 
OUTPUT: 

: CARRY SET = RAM MATCHES PACKET 

: CLR - RAM DOES NOT MATCH PACKET 


SIMPLICIT OUTPUT: 
THE TABLE RAMDATA IS FILLED WITH THE 



















3 DATA HELD IN RAM. 
: RAMSIZ IS SET TO 8. FOR PRAMPKT ROUTINE 
:SIDE EFFECTS: 
CKRAM:: 
SAVREG sSAVE THE GENERAL REGISTERS 
MOV #RAMDATA,R1 * ADDRESS TO SAVE THE RAM DATA 
MOV #RAPKTBEG,R2 BYTE ADDRESS OF FIRST RAM DATA 
CLR R3 *CLEAR THE ERROR FLAG 
JSR PC, CHKTSSR 
10$: PC CHKTSSR 
» TSOBH(RS) 
PC .CHKTSSR 
HE ost (R1) AD THE RAM DATA 
CR1)+, Rade > COMPARE TO EXPECTED 
20$ sBRANCH IF OK 
NC R3 3SET ERROR FLAG 
20S: sADDRESS OF NEXT RAM LOCATION 
CMP R2, #RAPKTEND sREACHED END YET 
BLE 0$ SBRANCH TILL ALL READ 
TST R3 AN ERROR FOUND ? 
BEQ 30$ sBRANCH IF NOT 
CLC sCLEAR CARRY TO SHOW ERROR 
8R 50$ sAND EXIT 
30S: SEC sSHOW GOOD COMPARE 
508: MOV #8. ,RAMSIZ sSETUP RAMSIZ FOR PRAMPKT ROUTINE 
RTS PC sRETURN 


SEQ 52 


——— ————— ⏑⏑⏑[ *— 


— — — — — EE — — — — — 
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RAMER - READ AND DISPLAY SELECTED RAM 




















3 . -SBTTL RAMER = READ AND DISPLAY SELECTED RAM 
2155 sROUTINE TO READ THE SELECTED RAM LOCATIONS 
2157 : INPUT: 
2159 : R5 FIRST DEVICE UNIBUS ADDRESS 
2160 CONSOLE WILL ALSO BE PRINTED TO 
2162 * IMPLICIT OUTPUT: 
2164 : THE TABLE RAMDATA IS FILLED WITH THE 
2165 DATA HELD IN RAM. 
2167 : SIDE EFFECTS: 
2170 3° 
2171 
2172 010456 RAMER:: 
2173 010456 SAVREG sSAVE THE GENERAL REGISTERS 
2174 010462 013705 010642 MOV RESET RS TC —5 DEVICE SecisTER 
1 002206 MOV : ADDRESS TO SAVE THE RAM DATA 
010640 MOV sBYTE ADDRESS OF THE FIRST RAM DATA 
002246 MOV SET THE SIZE OF THE READ UP 
7 017054 10$: JSR sWAIT FOR THE SSR TO SET 
177777 SELECT NEXT RAM ADDRESS 
17054 JSR sWAIT FOR SSR TO = 
177776 MOVE READ THE RAM DATA 
1 208: ADD S ADDRESS OF THE NEXT RAM LOCATION 
$08 sNUMBER OF LOCATIONS COUNTER 
002246 MOV °GET THE RAM SIZE 
010640 MOV °GET THE STARTING RAM ADDRESS 
ADD sCALCULATE THE END ADDRESS 
000001 SUB CORRECT VALUE OF PRINTOUT 
PRINTX sRAM ADDRESS = 10 - 17, ETC. 
MOV 
MOV 
010644 MOV 
3 MOV 
MOV 
TRAP 
000010 ADD 
002206 MOV s ADDRESS OF WHERE RAM DATA IS 
002246 nov sTHE SIZE OF THE RAM FIELD READ 
30$: CLR °NO EXTRA DATA LEFT OVER 
MOVB PICK 4 BYTE OF _, = 
177400 °GET R ID OF SIGN EXT 
— 3910 211 111 222 377 "000 123 134 ETC. 
010715 
000002 
000006 
; LOOP UNTIL ALL PRINTED 
RAM ADDR va bee 1ST ADDRESS 
0 HOLDS RS FOR i 
116 *ENZA Ram Address (Octal) = TOSSA = Z03IZN° 
101 "ZA ZOSZA ° 





— eae - 
— — — 


CZTUWAO TUSO FRONT END PRT A 


— — — ——— — — — — —— 


¢ > 
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MACRO #1200 
CKRAM2 = COMPARE RAM TO 1/0 CHARACTERISTICS DATA 






2231 010750 
2232 010730 


2 
2233 01 My by —3338 002206 


4 000167 
017054 
017054 
177777 
017054 
177776 


000010 
7 000176 


002246 


-SBTTL CKRAM2 = COMPARE RAM TO 1/0 CHARACTERISTICS DATA 


“ROUTINE TO READ THE FIRST 8 OR 10 BYTES FROM R 
SMEMORY AND COMPARE THIS DATA TO A CHARACTERISTICS DATA BLOCK. 


* INPUT: 

; Ré ADDRESS OF THE CHARACTERISTICS DATA 
: as FIRST DEVICE UNIBUS ADDRESS 

OUTPUT 

; CARRY SET = RAR MATCHES PACKET 

: CLR = RAM DOES NOT MATCH PACKET 


SIMPLICIT OUTPUT: 
THE TABLE RAMDATA IS FILLED WITH THE 


DATA HELD IN 
RAMSIZ IS SET TO 8. OR 10. FOR PRAMPKT ROUTINE 
:SIDE EFFECTS: 


























CKRAM2:: 
SAVREG sSAVE THE GENERAL —328* 
MOV #RAMDATA,R1 SADDRESS TO SAVE THE RAM DATA 
MOV #RACHBEG,R2 BYTE ADDRESS OF Ay RAM DATA 
CLR 23 :CLEAR THE ERROR FLAG 
JSR WAIT FOR SSR 
10$: JSR WAIT FOR SSR TO SET 
MOVB : 
JSR 
MOVE READ THE RAM DATA 
CMB sCOMPARE TO EXPECTED 
BEQ BRANCH IF OK 
INC :SET ERROR FLAG 
208: INC sADDRESS OF NEXT RAM LOCATION 
MOV > ASSUME MORMAL NOT SET 
CHP REACHED END YET ? 
BLE 1 BRANCH M TILL ALL READ 
278: TST RS WAS AN ERROR FOUND ? 
BEQ 30$ sBRANCH IF NOT 
CLC sCLEAR CARRY TO SHOW ERROR 
aR 50$ AND EXIT 
SEC sSHOW GOOD COMPARE 


308: 
50S: RTS PC sRETURN 





SEQ 54 


oo by FRONT END PRT A 
ARE WRITE CHAR. MESSAGE BUFFER 





So 
— 
— 
fw 





SEE 


2291 01 


— 


X 
[=] 
8 ed ee ee ed aed es oS aed ae ae ed — — — — 


8 
~ 


902222222222 
SnerNore 


SESSSSEESSS 
S ERE 





et et el eh ed ed ee ed el ae ed ae — — — — 


So 
reek 





dD 5 
— ee 13:26 PAGE 35 


»SBTTL CKMSG = COMPARE WRITE CHAR. MESSAGE BUFFERS 


;* 
;ROUTINE TO conpasẽ A WRITE CHARACTERISTICS EXPD AND RECV 


:BUFFER. THE EXPECTED AND RECEIVED BUFFERS ARE STORED FOR 
ZERROR PRINT ROUTINES. 


* INPUT: 

; RO RECV MESSAGE BUFFER HIGH ORDER ADDRESS 
: R1 RECV MESSAGE BUFFER LOW ORDER ADDRESS 
: R2 EXPD MESSAGE BUFFER ADDRESS 

sOUTPUT: 

; CARRY SET - MESSAGE BUFFERS MATCH 

; CLR “MESSAGE BUFFERS DON'T MATCH 


IMPLICIT OUTPUT: 
BUFFER 1S SET TO EXPD DATA 





3 RECMSG BUFFER IS SET TO RECV 
: RCVHIADD SET TO HIGH ORDER ADDRESS OF RECV 
; RCVLOADD SET TO LOW ORDER ADDRESS OF RECV 
CKMSG:: 
SAVREG sSAVE R1-RS UNTIL NEXT RETURN 
MOV sSAVE RECV HIGH ADDRESS 
MOV 3 SAVE RECV LOW ADDRESS 
TST sTESTING ABOVE 28K? 
BEG :BR IF NO 
JSR sRETURN ADDRESS BIASED TO PAR6 IN RO 
MOV GET RETURNED ADDRESS BIASED TO PAR6 
10$: CLR sWORD IN BUFFER 
CLR SCLEAR ERROR SEEN FLAG 
MOV sGET EXPD BUFFER ADDRESS 


R2,R5 

15$: MOV (R2) ,EXPMSG(R4) :SAVE EXPD FOR ERROR REPORT 
MOV (R1) .RECRSG(R4) :SAVE RECV FOR ERROR REPORT 

CMP cney+ (R1¢ SEXPD EQUAL RECV? 

















BEG sBR IF VES 
INC R3 SSET ERROR SEEN FLAG 
258: ADD #2, R4 “POINT TO NEXT WORD ADDRESS 
* —* SDONE FIRST 7 WORDS? 
Bit #X2.EXTE.XST2(RS5:1S EXTENDED FEATURES SET IN EXPD? 
cre Ro #16 “DONE EXTENDED FEATURES WORD? 
508: TST a3 “ANY ERRORS SEEN? 
BEQ 55$ ; 
CLC “SET FAILURE 


BR : 
55$: SEC sSET SUCCESS 
60$: sRETURN 


SEQ 55 





CzT 
CKA 


32 
334 
336 
38 
2339 011152 
2340 011152 
2341 011156 
2342 011162 
011164 
344 011170 
011170 
011174 
011200 
011202 
011204 
011210 
011214 
0112 
348 011 
O11 
2350 O11 
351 O112 
ag 011 
3 O11 
54 O11 
011250 
011252 
O11 
011 
O11 
on 
1 
011 
011272 


UWAO TUSO FRONT END PRT A 


$62 
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- COMPARE EXPD RECV MESSAGE BUFFERS 





SFLSRS 
— 





* ~SBTTL CKMSG2 — COMPARE EXPD RECV MESSAGE BUFFERS 


“ROUTINE TO COMPASE AN EXPECTED AND RECEIVED MESSAGE 


sBUFFER. THE EXPECTzD AND RECEIVED BUFFERS ARE STORED FOR 
ERROR PRINT ROUTINES. 


RECV MESSAGE BUFFER HIGH ORDER ADDRESS 
RECV MESSAGE BUFFER LOW ORDER ADDRESS 
EXPD MESSAGE BUFFER ADDRESS 

NUMBER OF BYTES TO COMPARE 











CARRY SET = MESSAGE BUFFERS MATCH 
CLR - MESSAGE BUFFERS DON'T MATCH 


SIMPLICIT OUTPUT: 
EXPMSG BUFFER IS SET TO EXPD DATA 





SET TO LOW ORDER ADDRESS OF RECV 


xs @e Ge Ge Ge Ge @ 


5 
g 


sSAVE R1I-RS UNTIL NEXT RETURN 
R3,@RECMSG-EXPMSG;@@D 1S COUNT ABOVE MAX ALLOWED? 





#RECRSG-EXPRSG, RS; 88D 








5$: MOV sSAVE RECV HIGH ADDRESS 
MOV sSAVE RECV LOW ADDRESS 
TST sTESTING ABOVE 28K? 
BEQ sBR IF NO 
JSR sRETURN ADDRESS BIASED TO PAR6 IN RO 
NOV sGET RETURNED ADDRESS BIASED TO PAR6 
10$: CLR : * FER 


RS sC 
15$: ROVE (R2) ,EXPASG(R4) 
oa (R1) ,RECMSG(R4) 


(R2)¢, (R14 
BEQ 258 
INC RS 
25$ AOD #1,R4 
CAP R4 RS 





Y 
15$ sD0 NEXT BYTE 
ANY ERRORS SEEN? 





SEQ 56 


— — — — — 


CZTUWAO TUBO FRONT END PRT A 
CKMSG2 





8 
3 
o 
poy 
22 
Us 
~ 
. 
2 
a 
Ron 


Oar 





056 
Z 011473 126 105 


F § 
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- COMPARE EXPD RECV MESSAGE BUFFERS 


cic sSET FAILURE 
BR 60$ ; 
553: SEC ;SET SUCCESS 
60$: RTS pr ; RETURN 


/ TSSR ERROR CODE REC*D = / 
4.20. AFTER DOING SOFT INIT/ 
/TEST: ooet 





SEQ 57 


eASCIZ ‘PROGRAM INTERNAL ERROR -CKMSG2 MESSAGE BUFFER EXCEEDED-° ;@a0 
/ENZA ete/ 








8 Sbaeanse 


222222 

— 
223333333233 
SEESSLSSSSS 


2222 


— — eld — 
226oo 0 


Bh 


004737 
004737 


104425 





CZTUWAO TURBO FRONT END PRT A 
CKMSG2 <- COMPARE EXPD RECV WE SSAGE BUFFERS 


005264 
017772 


005264 
000004 
006704 
002716 
013702 
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30 
SPRINT ROUTINE TO FATAL SOFT INIT ERRORS 
3 INPUT : 

RI 
SIDE EFFECTS: 


EXECUTES DROP UNIT TO CEASE TESTING 


CONTENTS OF TSSR AT ERROR 


BGNASG SFIASG 

SF IASG: : 
JSR PC .PRITSSR 
JSR . PC ,CKDROP 


110003: 
TRAP CSMSG 


sPRINT CONTENTS OF TSSR REGISTER 
sDROP UNIT, IF ALLOWED 


SPRINT ROUTINE TO PRINT THE CONTENTS OF 
:TSSR AND A COMMAND PACKET OTHER THAN GET STATUS COMMAND PACKET. 


< INPUTS: 














; R1 TSSR CONTENTS 
5 Re ADDRESS OF COMMAND PACKET 
BGNASG PKTSSR 
PKTSSR:: 
PC PRITSSR sPRINT THE CONTENTS * TSSR REGISTER 
ROY #4 RO :WO. OF WORDS IN PA 
JSR PC ,PRIPKT SPRINT THE CONTENTS OF COMMAND PACKET 
MOV MESBFA, SADDRESS OF MESSAGE BUFFER 
CLR 8 sASSUME NO HIGH RERORY 
JSR PC .PRAESS sPRINT THE MESSAGE BUFFER ALSO 
* ENDASG 
TRAP CSASG 


PRINT ROUTINE TO PRINT THE CONTENTS OF 
sTSSR AND A GET STATUS COMMAND PACKET. 


; INPUTS: 


Ra TSSR CONTENTS 
Re ADDRESS OF COMMAND PACKET 


SEQ 58 


— —— — J 





















CZTUWAD TUBO FRONT END PRT A MACRO M1200 29-MAR-83 13:24 PAGE 35-1 = © 
CENSG2 = COMPARE EXPD RECV MESSAGE BUFFERS 
2627 
2428 0611550 BGNMSG PKIGETS 
24 $11880 004737 005264 menses Pr .PRITSSR ;PRINT THE CONTENTS OF TSSR REGISTER 
F N 
2430 011554 012700 000002 MOV #2," DS IN GET STATUS PACKET 
2631 011560 004737 006704 JSR PC.PRIPKT ‘PRINT THE CONTENTS OF COMMAND PACKET 
2632 011564 ENDMSG 
011564 110005: 
011564 104423 TRAP — CSMSG 
2433 
24 
2435 3* 
2636 SPRINT TSSR ERRORS FOR INITIALIZATION TESTS 
2438 INPUTS: 
2439 3 
2640 : Rn} TSSR CONTENTS 
2461 : Ro ADDRESS OF COMMAND PACKET 
2643 . 
2644 011566 BGNMSG SFFMSG 
011566 SFFMSG:: 
2445 011566 004737 005264 JSR PC .PRITSSR SPRINT CONTENTS OF TSSR REGISTER 
2446 011572 ENDMSG 
11572 L10006: 
011572 104423 TRAP  CSMSG 
: .SBTTL PKIMES - PRINT TSSR AND MESSAGE BUFFER 
SPRINT ROUTINE TO PRINT THE CONTENTS OF TSSR AND MESSAGE 
BUFF ER FOR ERROR REPORTS 
INPUTS: 
ai CONTENTS OF TSSR 
R2 LOW ORDER MESSAGE BUFFER 
R3 HIGH ORDER MESSAGE BUFFER ADDRESS 
NOTE: R3 IS IGNORED IF KTENABLE FLAG IS CLEAR 
011576 BGNNSG PKTMES 
011574 006737 005264 “"JSR  —s- PC, PRITSSR SPRINT CONTENTS OF TSSR 
011600 01 MOV R2,RO ; S 
011602 010301 “HIGH ORDER ADDRESS 
11606 004737 013702 SPRINT THE MESSAGE BUFFER 
011610 L10007: 
011610 104423 T 





— — — — - 
— —— — — 





CZTUWAO TUSO FRONT END PRT A 


ADDSSR 


2500 
2501 
2502 
2503 
2504 


2305 
2506 





- PRINT TEST ADDRESS AND T 





011630 
011630 
0116 


011640 
011640 


30 
011634 
011640 


007640 
000000 
005264 





012700 000007 
004737 015242 


104423 


oSBTTL 


1 $ 
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ADDSSR <= PRINT TEST ADDRESS AND TSSR 


SPRINT ROUTINE TO PRINT THE CONTENTS OF 
:TSSR AND A MEMORY TEST ADDRESS 


: INPUTS: 


Ge Ge Oe Oe Oe Be % 
3° 
Nes 


L10010: 


oSBTTL 


* 























FIRST DEVICE —* ADDRESS 
HIGH ORDER MEMORY TEST ADDRESS 
LOW ORDER MEMORY. TEST ADDRESS 





PC ,PRITADD s PRINT = TEST ADDRESS 
TSSRCRS) RI GET CURREN 
PC .PRITSSR sPRINT THE CONTENTS OF TSSR REGISTER 





CSASG 


MSGEXP - PRINT WRITE CHAR. EXPD-RECV MESSAGE BUFFERS 


PRINT ROUTINE TO PRINT WRITE CHARACTERISTIC MESSAGE BUFFER 
sIMPLICIT INPUTS: 


- EXPECTED MESSAGE BUFFER 


RECMSG = RECEIVED MESSAGE BUFFER 
RCVHIADD- RECEIVED MESSAGE BUFFER HIGH ORDER ADDRESS 
RCVLOADD- RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 


87 ,RO sASSUME NO EXT FEATURES 
PC ,PRASGE XP SPRINT EXPD/RECV MESSAGE BUFFERS 


CSASG 


SEQ 60 


——————— nnn 


——— eee - 


— — — — — — — — — — 








J 5 








1 
ZiUWAO TU8O FRONT END MACRO M1200 29-MAR-83 13:24 PAGE 37 —s 
rirenp = PRINT FIFO DAP /RECY DATA 
2508 .SBTTL FIFEXP = PRINT FIFO EXP/RECV DATA 
358 # 
511 “PRINT ROUTINE TO PRINT FIFO EXP/RECV DATA 
2513 ; R1 - BYTE COUNT 
2514 : 
2515 ‘IMPLICIT INPUTS: 
2517 ; EXPMSG - EXPECTED MESSAGE BUFFER (CONTAINS FIFO DATA ONLY 
2318 : RECMSG — RECEIVED MESSAGE BUFFER (CONTAINS FIFO DATA ONLY) 
2520 011642 ‘ FIFEXP 
011642 FIFEXP:: 
2521 011642 PRINTX #FIFIMSG,RI SPRINT BYTES TRANSFERRED 
011642 010146 MOV Ri,- 
011644 012746 011714 MOV #F IF 1MSG,=(SP) 
011650 012746 000002 MOV #2,-(SP) 
011654 010600 MOV SP 





011656 104415 
062706 
sPRINT HEADER MSG 


1664 012746 0117635 
011670 012746 000001 
011674 010600 


011676 104415 











011700 062706 000004 
2523 011704 010100 R1,RO sGET BYTE COUNT 
2524 303 004737 015612 PC ,PRBYTEXP SPRINT FIFO BYTES IN ERROR 
011712 110012: 
011712 104423 BAP CSMSG 
2526 011714 045 116 045 FIFIASG: eASCIZ ‘SZNZA NUMBER OF BYTES TRANSFERRED = 102 
33 011763 045 116 045 FIF2MSG: Astit ‘“SNZA FIFO DATA BYTES IN ERROR:° 
2529 








CZTUWAO TUSO FRONT END PRT A 
MSGSTAT - PRINT STATUS HEADER AND MESSAGE BUFFERS 


2 

2544 012022 

2545 012022 
546 012026 





012701 


104425 


012064 


12536 
2578 012536 012701 012600 





MACRO M1200 29-MAR-83 13:24 PAGE 38 


0122355 





. ~SBTTL MSGSTAT = PRINT STATUS HEADER AND MESSAGE BUFFERS 


“PRINT ROUTINE TO PRINT MESSAGE BUFFER EXPD/RECV 
[IMPLICIT INPUTS: 
EXPMSG - EXPECTED MESSAGE BUFFER 
~ RECEIVED MESSAGE BUFFER 


; RCVHIADD= RECEIVED MESSAGE BUFFER HIGH ORDER ADDRESS 
: RCVLOADD= RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 


BGNASG MSGSTAT 


MSGSTAT:: 
M0 ee 


sASCII ADDRESS TABLE 
10S: DONE ALL MSG 


LINES? 
:8R IF YES 
;PRINT STATUS BIT NAMES 





:b0 ANOTHER MSG LINE 
R OF 











208: # WORDS IN A READ STATUS BUFFER 
: PC ,PRASGEXP PRINT EXPD/RECV MESSAGE BUFFERS 
110013: 
T CSMSG 
1$: .ASCIZ Bus $i gnats s in Word #8:° 
23: .ASCIZ PARERR<15> 1EOT <12> IFMK <9> IRDY<6> IRWD<2>° 
: ASCIZ Hoth phe a> IHER <8> IONL<S> IFBY<1>° 
on. aaeit ox ties — — < 10> ISPEED<7> ILDP<4> IFPT<O0>° 
: ASCIZ ar FD cs a — OUTRDY<5> INRDY<4>° 





-SBTTL MSGLOOP - PRINT LOOPBACK HEADER AND MESSAGE BUFFERS 


30 


“PRINT ROUTINE TO PRINT MESSAGE BUFFER EXPD/RECV 

SIMPLICIT INPUTS: 

EXPMSG - EXPECTED MESSAGE BUFFER 

RECMSG - RECEIVED MESSAGE BUFFER 

RCVHIADD- RECEIVED MESSAGE BUFFER HIGH ORDER ADDRESS 
RCVLOADD= RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 
BGNNSG MSGLOOP 


' ' 3 ') 
4 


— 









SEQ 62 


— —— ee — — 


L 5 








SEQ 65 
CZTUWAO hy FRONT END PRT A MACRO 1200 29-MAR-83 13:24 PAGE 38-1 
ASGLOOP INT LOOPBACK K HEADER AND MESSAGE BUFFERS 
2579 012542 012100 108: (R1)4,RO sDONE ALL MSG LINES? 
2580 33 001410 208 “BR IF YES 
2581 012546 “PRINT STATUS BIT NAMES 
012546 010046 RO.<(SP) 
012550 012746 000001 #1,-<SP) 
012554 010600 SP,RO 
012556 104415 CSPNTX 
012560 062 #4,SP 
2582 012564 000766 108 :00 ANOTHER MSG LINE 
2583 012566 012700 000012 208: #10. RO R OF WORDS IN A READ STATUS BUFFER 
2584 012572 004737 015242 JSR PC, PRMSGEXP “PRINT EXPD/RECV MESSAGE BUFFERS 
2585 012576 ENDMSG 
012576 110014: 
_— 012576 104423 TRAP CSMSG 
2587 012600 WORD 18,25,38,48,55.68,78.0 





ZNZA Tape —* A Signals in Word 48:* 

| ARERR<15 IRESV2<14> IRESV1<13>° 
INISPe>IEOT<12> IWRT=>1 IDENT<11> IREV =>ICER <10>° 
IUFM =>1FAK<O9> IEDIT=>IHER <08> IFAD =>ISPEED<07>° 
ITADO=>IRDY<06> ITAD1=>IONL <05> IERASE=>ILDP <04>° 
TREW =>1DBY<03> IRWU =>IRWD <02> IFEN =>IFBY <O1>° 


2588 012620 
2589 012675 
2590 012772 
2591 013071 
2592 013170 
25935 013267 
2594 013366 





2595 
2596 


— — — — — — 


— 


— — — — — — — 






135 


CZTUWAO TUSO FRONT END PRT A MACRO yi B A teats 13:24 PAGE 39 
MSGSUB - PRINT WRITE SUBSYSTEM MESSAGE BUFFE 


SEQ 64 













3339 - \SBTTL MSGSUB - PRINT WRITE SUBSYSTEM MESSAGE BUFFER 
2600 ; 
2601 “PRINT ROUTINE TO PRINT MESSAGE BUFFER EXPD/RECV 
OS : 
2604 [IMPLICIT INPUTS: 
2606 : EXPMSG = EXPECTED MESSAGE BUFFER 
2607 : RECMSG - RECEIVED MESSAGE BUFFER 
2608 : RCVHIADD= RECEIVED MESSAGE BUFFER HIGH ORDER ADDRESS 
2609 9 : RCVLOADD= RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 
2611 013614 — BGNMSG MSGSUB 
013414 MSGSUB:: 
2612 013414 012700 000012 MOV #10. ,RO sSIZE OF WRITE SUBSYSTEM BUFFER 
2613 013420 004737 015242 JSR PC ,PRASGEXP SPRINT EXPD/RECV MESSAGE BUFFERS 
2614 0134246 
013424 110015: 
013424 104423 TRAP  CSMSG 
2615 
2616 
2617 
2618 
2619 
2620 : .SBTTL MEMADD - PRINT MEMORY ADDRESS DATA ERROR 
2622 ; | 
ey [PRINT ROUTINE TO PRINT MEMORY ADDRESS DATA COMPARE ERROR 
2625 SIMPLICIT INPUTS: 
2627 ; = MEMORY ERROR HIGH ORDER ADDRESS 
2628 : = MEMORY ERROR LOW ORDER ADDRESS 
2629 - EXPECTED DATA 
att : - RECEIVED DATA 
ꝛoꝛꝛ + 743 : —* 
2633 013426 004737 007524 PC, PRIADD SPRINT MEMORY ADDRESS IN ERROR 
13432 013701 002176 EXPD,R1 SGET EXPD DATA 
2635 013436 013702 002200 RECV,R2 “GET RECEIVED DATA 
13442 7 007 PC PRIXOR “PRINT EXPD/RECV 
37 013446 
13446 
013446 104423 CSMSG 


cet sss — — — — — 


—— — — — — — ee — — — — — — — 


CZTUWAO TUBO FRONT END PRT A 
PRAMPKT - PRINT RAM AND PACKET DATA 


3476 
2670 013506 
2671 013512 
2672 0135 
2675 01 


012701 
005002 
122124 


002206 


177777 
177777 


77 
177777 


002176 
002200 


013616 
000005 


706 000014 





002246 
002246 


7? 000010 
002246 
7 


116 


N 5 
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+ -SBTTL PRAMPKT = PRINT RAM AND PACKET DATA 


SPRINT ROUTINE TO DISPLAY RAM/PACKET DATA 
;WHEN THE RAM DATA DOES NOT MATCH. 


$ INPUTS 
; RG POINTER TO COMMAND PACKET 
SIMPLICIT INPUTS: 
RAMDATA DATA AS READ FROM THE RAM 
RAMS1Z NUMBER OF BYTES IN PACKET 


OF 
IF RAMSIZ=0 THEN DEFAULT TO 8. 
s IMPLICIT OUTPUTS: 

RAMSIZ SET TO 0 

















PRAMPKT 
SAVREG sSAVE R1-R5 i NEXT RETURN 
Vv #RAMDATA,R1 DATA FROM THE RAM 
R sINIT BYTE NUMBER 
5$: CR1)+, (R4)+ ; COMPARE a" RECEIVED 
7$ sBR IF NO MATCH 
7$: ~1(R1) 83 GET RECV RAM DAT 
~1(R4) RS :GET EXPD PACKET DATA 
sKOR EXPD/RECV 
LOW BYTE ONLY 
002200 3GET RECEIVED RAM DATA 
002176 ~1(R4) ,EXPD GET EXPECTED RAM DATA 
#RAMASC ,R2 RECV.EXPD.R3 
R SP) 
SP, 
CSPNT 
#14 SP 
10S: R2 sUPDATE BYTE COUNT 
:DEFAULT TO 8.? 
15$ BR IF YES 
R2,RAMSIZ DONE ALL BYTES? 
3. sBR IF NO 
i * zbon᷑ DEFAULT NUMBER OF BYTES? 
25$: RAMS IZ 3SET DEFAULT RAMSIZ 
PC ;RETURN 
045 RAMASC "ENZA BYTE: ZD2ZA RAM: ZO3%ZA Packet: Z032A XOR:203° 


eASCIZ 
~EVEN 


SEQ 65 


‘ 
’ 
a ee oe ——————————— —— — — — — — ñ— 


¥ oo 
CZTUWAO TUBO FRONT END PRT MACRO "1200 | 
PRMESS = PRINT CONTENTS OF AMESSAGE BUFFER 


2688 
2689 - 
2690 


2691 ;THIS ROUTINE PRINTS THE CONTENTS OF 


29-MAR-83 15:24 PAGE 41 





-SBTTL PRMESS — PRINT CONTENTS OF MESSAGE BUFFER 











THE 7 WORD MESSAGE BUFFER RETURNED BY THE 





j INPUT: 


mY ORDER ADDRESS OF woe 83 





R1 ORDER 
NOTE: al” 1S IGNORED IF KTENABLE FLAG I$ CLEAR 
ſmis ROUTINE IS NORMALLY CALLED FROM A PRINT ROUTINE 















PRMESS: 
SAVREG sSAVE THE REGISTERS 
010537 010642 MOV R5 ,RAMRSH : SAVE os REGISTER POINTER 
010005 MOV ° 3SA ORDER ADDRESS 
005737 003102 TST KTENABLE S ADDRESS ABOVE 28K? 
001001 BNE 10$ sBR YES 
00500 CLR R1 :SET HIGH ORDER ADDRESS TO 0 
010103 10$: MOV R1,R3 sSAVE HIGH ORDER ADDRESS 
0061 ROL RO iSMIFT BIT15 TO C BIT 
006101 ROL R1 sSHIFT TO HIGH ORDER FOR PRINTOUT 
PRINTX #PROASC.R1,.RS ;PRINT MESSAGE BUFFER ADDRESS 
010546 MOV (SP) 
010146 MOV 
012746 014533 MOV 
012746 000005 MOV 
01 MOV 
104415 TRAP 
062706 10 ADD 
022715 177777 CMP ee BUFFER FULL OF ONES 
00101 BNE :BR IF BUFFER IS PROBABLY OKAY = 
PRINTX FN s*MESSAGE BUFFER PROBABLY NOT VALID 
012746 014453 MOV = #MESBFN,~(SP) | 
770 012746 000001 MOV #1,°(SP) | 
010600 HOV —s- SPRO | 
106415 TRAP = CSPNTX | 
15$: PRINTX #PRIAS” sPRINT HEADER FOR CONTENTS 
014600 MOV #PRIASC .-(SP) 
000001 MOV #1,-(SP) 
MOV { SP,RO 
TRAP CSPNTX 
000004 ADD #4,SP 
CLR RG sNUMBER OF THE NEXT WORD 
OV RS.R1 :COPY LOW ORDER ADDRESS 
MOV R3,R0 COPY HIGH ORDER ADDRESS 
020106 Os i ser TUP PAR — In RO 
208 MOV oR5 GET P PAR FORMAT ADDRESS ABOVE 28k 
PRINTX = 


CZTUWAO TUBO FRONT END PRT A 


01 
2731 30 32 


14170 
2732 014174 
14174 
014176 
14206 
dire 3 
2733 014216 
1421 





012546 
127 

012746 

0600 


46 014636 
000002 


000006 
014703 
000002 
000006 


014750 
006002 


546 
46 015015 
009002 


015062 
00000 


015127 
000002 
000006 


015174 


002134 


40$: 







C 6 


MACRO M1200 29-MAR-83 15:24 PAGE 41-1 
PRMESS = PRINT CONTENTS OF MESSAGE BUFFER 


<R5)+,-(SP) 
oT 


@DATAFL,(RS)* 
(RS5)¢,-(SP) 
@DATAFL.-(SP) 
#2,-(SP) 


#6,SP 
#RBPCRA,(R5)+ 
(R5)+,=(SP) 
#RBPCRA,-(SP) 
#2,°(SP) 


#6,SP 
#XSOCON, (R5)+ 


#XS1CON, (R5)¢ 


#XS1CON,-(SP) 
#2,-(SP) 
SP.RO 


CSPNTX 
#6,SP 
#@xS2CON, (R5)+ 


#1, TRANSTST 
08 








;PRINT 


sPRINT 


sPRINT 


sPRINT 


sPRINT 


sPRINT 


“DATA FIELD LENGTH 


“RESIDUAL BYTE COUNTER 


"“XSTATO CONTENTS 


“MSTAT1 CONTENTS 


"“ASTAT2 CONTENTS 


"XSTATS CONTENTS 


CHECK SOFTWARE P-TABLE 


: DON'T 


DO THE DUMP 


SEQ 67 


——— — — ee 





CZTUWAO TUBO FRONT END PRT A MACRO 
PRAESS — PRINT CONTENTS OF MESSAGE BUFFER 









2738 014274 
2739 014 
2740 01431 
2741 0143514 


2750 01445 

2751 014533 
2752 014600 
2754 014636 
2755 014703 
2756 014750 
2757 015015 
2758 015062 


2759 4 4 44 
flan 


35 000010 002246 
000020 010640 
010456 

—35 000040 010640 

010456 

01 gat 000060 010640 

004737 010456 

012737 000020 002246 

012737 100 010640 

004737 010456 

000207 

045 116 
045 116 045 
045 116 045 
045 116 045 
045 116 
045 116 
045 116 
045 116 
045 116 
045 116 
045 116 


1200 








C: 
PRIASC: 








bbb 


33385 
33383382288 re me 
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#8. .RAMSI2 
#20. RAMHLD 
PC RARER 

—— 
#60 ,RAMHLD 
PC .RAMER 

#16. ,RAMSIZ 
#100, RARHLD 


PC RARER 
PC 




















SFIELD STARTS AT 1 

sREAD AND PRIN Nt T 
; RETURN 

‘ ENZA seeeeerere SPECIAL 


"ZNZA MESSAGE BUFFER CONTENTS PROBABLY NOT VALID’ 
"ZENZA Message Buff 


sRAM FIELD IS 8 BYTES LONG 
SFIELD STARTS. AT 20 OCTAL (10 HEX) 













PRINT * 
*FIELD STARTS AT 40 OCTAL (20 HEX) 
sREAD AND fi 
sFIELD STARTS AT 60 OCTAL (30 HEX) 
i. AND PRINT THEM 








FIELD IS rt at BYTES LONG 
00 OCTAL (40 HEX) 






M7454 RAM MEMORY DUMP seeeceeere’ 
er Address = %01%05' 





"ZNZA Message Buffer Contents: ° 
Buffer Header 





SEQ 68 


— LLL — — — — — — 


— —— ee — — — —— 


CZTUWAD TUBO FRONT END PRT A MACRO M1200 29-MAR-83 15:24 PAGE 42 
PRASGEXP - PRINT EXPD/RECV MESSAGE BUFFERS 


SEQ 69 





-SBTTL PRMSGEXP - PRINT EXPD/RECV MESSAGE BUFFERS 
; ROUTINE TO PRINT se AND RECEIVED MESSAGE BUFFERS 


R OF WORDS IN BUFFER 
SIMPLICIT INPUTS: 
: EXPMSG <- EXPECTED MESSAGE BUFFER 
RECMSG - RECEIVED MESSAGE BUFFER 
RCVHIADD= RECEIVED MESSAGE BUFFER HIGH ORDER ADDRESS 
RCVLOADD= RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 








e772 
2775 015 










34 


sSAVE RI-RS UNTIL NEXT RETURN 
R OF WORDS 




























2775 015246 01 MOV RO.RS SSAVE NUMBE 
33 015250 013700 002252 MOV _—s- RCVLOADD, RO ;GET RECV LOW ADDRESS 
2777 015254 010004 mov iöö, COPY LOW 
3778 015256 013701 002250 MOV «sw RCVHIADD,R1 [GET RECV HIGH ADDRESS 
2779 015262 006100 ROL =s._-RO iSHIFT BIT1S TO C BIT 
2780 915264 006101 ROL “SHIFT TO HIGH ORDER FOR PRINTOUT 
2781 015266 PRINTX SPRINT MESSAGE BUFFER ADDRESS 
015266 MOV 
015270 010146 MOV 
015272 012746 015422 MOV 
015276 012746 MOV 
15 MOV 
015304 104415 TRAP 
015306 062706 000010 ADD 
2782 33 PRINTX sPRINT HEADER FOR CONTENTS 
19512 012746 015467 MOV 
O18 16 012746 MOV 
015322 010600 OV 
15 104415 TRAP 
15326 062706 000004 ADD 
015 CLR sNUMBER OF THE CURRENT WORD 
2784 015334 012701 002266 nO! SGET EXPD BUFFER ADDRESS 
2785 015 2702 002432 mOV 3GET RECV BUFFER ADDRESS 
015344 011100 208: "OV T EXPD 
2787 015346 011203 MOV 681 RECV 
01 XOR MPD/RECY 
2789 015360 PRINTX 
015360 01 mov 
015362 01 MOV 
015364 MOV 
015366 01 MOV 
015 015525 ROV 
015374 000005 MOV 
015400 01 MOV 
015402 106415 TRAP 
0154046 962706 000014 ADD 
2790 015410 INC SMUMBER OF THE NEXT 
2791 15412 020405 CMP “DONE ALL YET? 
2798 or 14 202001 QGE BR IF YES 
15416 000752 BR D0 ANOTHER 
79% 01 000207 50$: ats > RETURN 
—8 38 re We —— ‘AS - Bul fer — — — 
e $ er Lonten 
797 015525 045 116 PRNSG2: .AS #Z02ZA EXPD: ZO6ZA RECV: ZO6ZA XOR: 206" 












Bae 
arn 


S303 33326 


el) co —— —— 208 wh watt — eed ee — — ot oot — 


AAA 
3232323 


ẽẽ 


0 
0 
0 
2817 0 
2818 0 
2819 0 
2820 0 
2821 0 
2622 0 
2625 0 
3425 0 

0 
2626 0 
2627 0 
2628 0 
2629 0 
2830 0 
9 
2 
0 


3 


ss 





FMUNONG & 





ooo 
— dh aD wd — 


110337 
122122 
00 
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PRBYTEXP - PRINT ERROR BYTES IN EXP/REC MESSAGE BUFF ca 


002264 
002266 
0024352 
177400 
016160 
177400 
016162 


002264 


7 002264 


016162 
016160 


016026 
000005 


706 000014 


002264 
016115 
000002 


MACRO Mf 


000010 


— — — — — 
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-SBTTL PRBYTEXP - PRINT ERROR BYTES IN EXP/REC MESSAGE BUFFER 


* 


— TO PRINT ERROR BYTES IN MESSAGE 





BUFFERS 
ONLY THE FInsST 8 ERRORS ENCOUNTERED ARE PRINTED DUE TO SCREEN SPACE 
RO - NUMBER OF BYTES IN BUFFER 
HIMPLICIT INPUTS: 


: EXPMSG - EXPECTED MESSAGE BUFFER 
; RECRSG - RECEIVED MESSAGE BUFFER 


PRBYTEXP: : 
SAVR 


sSAVE RI-RS UNTIL NEXT RETURN 
sSAVE NUMBER OF BYTES 



































CLR INIT ERROR COUNT 
CLR *NUMBER OF THE CURRENT BYTE 
ROV ER ADDRESS 
MOY 
208: move 
BIC 
MOVvB sSAVE FOR 
BOYS :GET RECV BYTE 
BIC ; CLEAR UPPER BYTE 
sFOR ERROR REPORT 
273: 
FORCEXIT saad 
:aad 
308: 
FORCERROR 27$.NOTSSR ;88D 
358: ;3a0 
RE > UMBCR 
R4 RS 3DONE AL 
508 38R VE 
208 300 HE 
50S: SPRBTOT.PRANO PR 
PRANO,- (SP) 
#2,°(SP) 
oRO 





T = 





SEQ 70 


= — 
— — — — — — = 
A — — 


— 
—— — — — —— — — — — — 


— — —— — — 





—— —— — — — ——— ————rr —â—— — — Eee 
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PRBY TEXP - PRINT ERROR BYTES IN EXP/REC MESSAGE BUFFER 
01 062706 000006 ADD * iil 


2843 016024 000207 RTS PC ;RETURN 


2845 016026 045 116 045 PRBMSG: .ASCIZ ‘NEA BYTE #ED2ZA_ EXPD: ZO3ZA RECV: ZO3ZA XOR: 203° 
ee 016115 045 116 045 PRBTOT: .ASCIZ ‘ZN2A NUMBER OF BYTES IN ERROR = 202° 




















284 “EVEN 
2848 016160 000000 PPBEXP: .WORD 0 SEXPD 
6162 000000 PRBREC : 0 SRECV 
3* 
SPRINT ROUTINE TO DISPLAY EXPD/RECV DATA 
: INPUTS: 
: R1 RECEIVED DATA 
: R2 EXPECTED DATA 
BGNMSG EXPREC 
EXPREC:: 
004737 007306 JSR —s- PC, PRIXOR :PRINT THE DATA 


016170 : 
; 016170 104423 TRAP CSMSG 





SEQ 71 





H 6 
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EXPBREC - PRINT EXPD/RECV BYTE DATA 


2868 -SBTTL EXPBREC - PRINT EXPD/RECV BY" DATA 





= 


PRINT ROUTINE TO OISPLAY BYTE EXPD/RECV DATA 





; INPUTS: 
: R1 RECEIVED DATA BYTE 
; R2 EXPECTED DATA BYTE 
2880 
2881 016172 BGNMSG EXPBREC 
016172 EXPBREC: : 
2882 016172 004737 007156 JSR PC ,PRIBXOR sPRINT THE DATA 
2883 016176 NDMSG 
016176 110020: 
016176 104423 T CSMSG 


‘ -SBTTL RARMERR = PRINT RAM AND PACKET DATA 


SPRINT ROUTINE TO DISPLAY RAM/PACKET DATA 
: INPUTS: 

x POINTER TO COMMAND PACKET 
IRPL::.'’ INPUTS: 

RAMDATA DATA AS READ FROM THE RAM 


RAAS 17 NUMBER OF BYTES IN PACKET 
IF RAMSIZ=0 THEN DEFAULT TO 8. 





IMPLICIT OUTPUTS: 
RAMSIZ SET 10 0 


3 ZIzeBSVIBFSSFSSSSSSE SESE 
~ —— —RX 23 * ww 


016200 BGNASG RAMERR 
—388 RAMERR: : 
01 004737 013450 JSR PC ,PRAMPKT sPRINT RAM/PACKET DATA 
0 4 ENDMSG 
1 110021: 
016204 104423 TRAP CSMSG 


-SBTTL RAMTADD - PRINT TEST ADDRESS, RAM AND PACKET DATA 





se3s3232 2 


— — — — 


— — — — — — — 





CZTUWAO TUBO FRONT END PRT A 
RAMTADD - PRINT TEST ADDRESS, RAM AND PACKET DATA 


2919 


29 
2935 016206 

16206 
2936 016206 004737 007640 
2937 016212 004737 015450 
2938 016216 

01621 
016216 104425 





1 6 
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; R4 POINTER TO COMMAND PACKET 

; IMPLICIT INPUTS: 
RAMDATA DATA AS A FROM THE RAM 
RAMS 12 NUMBER OF BYTES IN PACKET 





If RAMS I7=0 THEN DEFAULT TO 8. 
ERRH] HIGH ORDER TEST ADDRESS 
ERRLO LOW ORDER TEST ADDRESS 
: IMPLICIT OUTPUTS: 


RAMSIZ SET TO 0 








BGNMSG RAMTADD 





RAMTADD: : 
J PC ,PRITADD sPRINT TEST ADDRESS 
= PC ,PRAMPKT sPRINT RAM/PACKET DATA 
110022: 
T CSMSG 





~SBTTL RAMEXP - PRINT RAM EXPD/RECV DATA 


“PRINT ROUTINE TO DISPLAY EXPD/RECV DATA 









: INPUTS: 

: R1 RECEIVED DATA 

: R2 EXPECTED DATA 

: at CONTROLLER RAM ADDRESS 

* BGNMSG RAMEXP 
“BIC  #*C<377>,R1 SAVE EXPD RAM DATA BYTE 

BIC #°C<377>,R2 ; 
JSR «PC, PRIRAR :PRI 
JSR «PC. PRIXOR SPRINT THE DATA 
ENDMSG 

110023: 
TRAP  CSRSG 





~SBTTL TIREXP - PRINT TIMER A.B AND EXP/REC 


SPRINT ROUTINE TO DISPLAY EXPD/RECV DATA 
AND TIMER A,B HEADER MESSAGE 


< INPUTS: 
: at RECEIVED DATA 
R2  _ EXPECT 


SEQ 75 





J 6 


Q 74 
MACRO M1200 29-MAR-83 15:24 PAGE 44-2 “ 
TIMEXP = PRINT TIMER A,B AND EXP/REC 


CZTUWAO TUBO FRONT END PRT A 


2970 :- 
2971 
2972 016242 BGNMSG TIMEXP 
016242 TIMEXP: : 
2973 016242 PRINTX sPRINT HEADER 


#Timsco 
#TIMSGO,-(SP) 


016242 012746 016270 MOV 
000001 MOV #1,-(SP) 


016246 38* 


016252 010600 MOV SP,RO 
016254 104415 TRAP CSPNTX 
016256 062706 000004 ADD #4 ,$P 
2974 016262 004737 007306 JSR PC ,PRIXOR sPRINT THE DATA 
ENDMSG 
110024: 
TRAP CSMSG 


116 045 yo al eASCIZ ‘ZNZA TIMER A STATUS IS IN BIT SENZA TIMER B STATUS IS IN BIT 2° 


3* 


“PRINT ROUTINE FOR TSSR ERRORS ON DATA TRANSFERS 





> INPUTS: 
: RI CONTENTS OF TSSR 
: R2 DATA WRITTEN (8 BITS) 
3991 tt 
2992 016370 G BADSSR 
16370 BADSSR:: 
2993 016370 010246 R2,-(SP) SAVE DATA TRANSFERRED 
16372 042702 177400 #177400,R2 “GET JUST ONE BYTE 


— — — — - 


2994 0 
2995 016576 
0163 





76 010246 


045 


110025: 


MFERASC: 








BIC 

PRINTS #XFERASC,R2 

MOV 2.° 

@XFERASC,-(SP) 
-(SP) 








CSPNTB 

#6.SP 

(SP)+,R2 sRESTORE R2 

PC ,PRITSSR sDECODE TSSR CONTENTS 


CSMSG 
oASCIZ 


"ZNZA Data Transferred = %03° 


LO 
EE — — — 
——— —————————— — — — — — 


— — — ae — — — — 


kK 6 
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SOF INIT = SOFT INITIALIZE "oF CONTROLLER 


SEQ 75 














* -SBTTL SOFINIT = SOFT INITIALIZE OF CONTROLLER 
3004 + 
3005 
3006 SROUTINE TO 00 A SOrT INITIALIZE OF re CONTROLLER 
3007 BY WRITING INTO THE TSSR gL AFTER THE INIT, 
3008 sTHE TSSR REGISTER IS TESTED FOR ERRORS. ANY ERRORS 
aarp ; DETECTED SHOULD BE TREATED AS DEVICE FATAL ERRORS. 
3011 * INPUTS: 
3012 : 
sola 2 R5 ADDRESS OF FIRST REGISTER 
3015 sOUTPUTS: 
3016 : 
3017 : RO CONTENTS OF TSSR, IF ERROR 
3018 : CARRY SET IF INIT WAS OKAY 
8 CLEAR IF FATAL ERROR 
3021 $ CALLING SEQUENCE: 
3022 ; 
3023 3 MOV #ADDRESS RS 
3024 s JSR PC SOF INIT 
3025 : ecs CONT INUE 
3026 ; ERRDF sREPORT FATAL ERROR 
3027 ; 
3028 —* 
3030 016464 SOF INIT:: 
3031 016464 SAVREG s SAVE THE REGISTERS 
wee 01 012765 000000 000000 #0, TSSR(RS) : DO THE INIT. 
3033 016476 004737 016740 PC ,WAITF 3 WAIT FOR SSR 
3034 016 016500 9000000 TSSRCRS) RO sGET THE TSSR REGISTER 
3035 016 010004 RO RS sTSSR CONTENTS 
3036 016 042704 176277 #°C<HIADDR!OFL>, R4 
3037 016514 052704 002200 #SSR!NBA,R4 sR4 MAS EXPECTED CONTENTS 
3038 016 020400 R4,RO sONLY EXPECTED BITS SET ? 
3039 016522 001402 5$ *BRANCH IF OKAY 

016 000241 sCLEAR THE CARRY FOR ERROR 
3041 0165 000401 10$ :60 TO EXIT 
3042 0165 000261 5$: SET THE CARRY BIT 
3043 016532 000207 10S: PC RETURN TO CALLER 





— nl — 
— — — — — 





3045 


CZTUWAO TUBO FRONT END PRT A 


01 

032700 100000 
001 

032700 174077 
001 —* 
032700 000200 
001011 

032700 000040 
001414 

042704 177761 
020427 16 
001007 
000410 
032700 000040 
001405 
032700 000006 
001002 

000241 

000401 

000261 

000207 


i. «6 
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HKAMB = CHECK TSSR FOR AMBIGUITY . — 


* 


.SoTTA CHKAMB = CHECK TSSR FOR AMBIGUITY 


THIS ROUT INE — THE CONTENTS OF THE TSSR REGISTER 
FOR AMBIGUITY 


<INPUT: 


:OQUTPUT: 





RO 
CARRY 


SAVREG 
MOV 





CONTENTS OF TSSR 


CONTENTS OF TSSR 


SET = NO AMBIGUITY 
CLR - AMBIGUOUS CONTENTS 


sSAVE THE GENERAL REGISTERS 
RO,R4 sCONTENTS OF TSSR 
#SC,RO 31S BIT —* 7 ? 


sBRANCH IF 
P’CENBALOFL!SSRIGIADDR>.RO sANY OTHER BITS SET ? 
40$ sMUST BE AN 
sRETURN WITH SUCCESS 
31S READY BIT SET ? 
BRANCH IF READY BIT IS - 
1S FATAL ERROR BIT SET 


sERROR IF NOT 
:CLEAR ALL BUT TERMINATION CODE 















#*CTERCLS.R4 

R4 #16 ALL THREE BITS MUST BE SET 
sERROR IF NOT SET 

45$ sOK IF ALL ARE SET 

#B1T5S RO 31S FATAL ERROR BIT SET ? 
ERROR IF BIT IS SET WITH SSR 

#BiT2:BIT1,.RO 31S THIS A FUNCTION REJECT 

45$ sBR, IF TSSR IS OK 

508 AMBIGUOUS CONTENTS 


SHOW SUCCESS - NO AMBIGUITY 
PC SRETURN TO CALLER 


SEQ 76 


— hanna 


— | — — 


— eee 





CZTUWAO TUSO FRONT END PRT A 


ae 
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ENAINT,DSBINT - ENABLE/DISABLE INTERRUPTS 


0046 
013700 002156 
016706 
pa A 000340 





012766 000000 000002 
000002 


012766 000340 000002 
000002 


»SBTTL ENAINT,DSBINT = ENABLE/DISABLE INTERRUPTS 


DEFAULT eye} INTERRUPT HANDLERS. 
OTHERWISE, SAVE Dru REGISTERS AND DISMISS. 


BIT DEFINITIONS FOR ‘‘INTMASK’’ AND ‘‘INTFLAG’’ BYTES: 


IOKCKIN=BIT7 ; DON’T CHECK FOR BAD INTERRUPTS -- TEST WILL. 
; EXPECT °’STOP’’ INTERRUPT. 


1OKSTP=BIT0 
: INTERRUPT MASK == SAYS EXPECTING INTERRUPTS 


SK: BYTE 
s INTERRUPT FLAG == SAYS WE GOT ONE (IF POSITIVE) 
INTFLAG: BYTE O 


SAVED INTERRUPT VECTOR: 
pote gg yyy 0 


3 SAVE PC 
INTCPC: .WORD 0 
sSUBROUTINE TO — eagle 


IF DISPLAY TIME-OUT, REPORT DEV FATAL, AND ABORT PASS. 


— —— — — — — — — 


ENAINT: MOV (SP SAVE RO 
MOV c,RO °GET POINTER TO VECTORS 
MOV  #INTR, (RO)+ “SET UP INTERRUPT VECTOR 
MOV = #PRIO7, (RO)+ 
MOV (SP)+,RO sRESTORE RO 
MOV (SP) ,-(SP) 
MOV #0,2(SP) sSET CPU TO LEVEL 0 
RTI 
sSUBROUTINE TO DISABLE INTERRUPTS (RAISE PRIORITY TO LEVEL 7) 
DSBINT: MOV (SP), -(SP) 
MOV gPRIO7,2(SP) 


>) 
ven 
react 


SEQ 77 


——— — — — 
—— — — — — 





nnn — — 


N 6 


CZTUWAC TUSO FRONT END PRT MACRO M1200 29-MAR-83 13:24 PAGE 48 
INTR - INTERRUPT HANDLERS 






3129 .SBTTL INTR — INTERRUPT HANDLERS 
3131 016706 site BGNSRV INTR sDEFINE INTERRUPT ENTRY 
3132 016706 012737 000001 002172 "MOV #1, iNTRECV sSET FLAG TO SHOW INTERRUPT RECEIVED 
3133 016714 105037 016635 CLRB  —s INTFLAG “CLEAR FLAG TO SAY WE GOT INTERRUPT 
3134 016720 132737 000001 016634 BITB #IOKSTP,INTMASK ;EXPECTING STOP INTERRUPT? 
3135 016726 001003 BNE sBR IF YES 
3136 016730 152737 000001 016635 BISB  #I1OKSTP,INTFLAG :;NO. SET THE ERROR FLAG. 
3138 >SAVE REGISTERS, MSG BUFFER, ETC. 
3139 016736 i$: 
3140 016736 ENDSRV 
016736 L10026: 
016736 000002 RTI 


— — — — — — 


SEQ 78 


3158 016740 
016740 


3159 016742 
3160 016746 


17002 


CZTUWAO TUBO FRONT END 
WAITF 


104422 
012746 


46 012727 
000000 


100420 


17006 012727 
000000 


013727 


PRT A 
- WAIT FOR SUBSYSTEM READY 


010000 
000001 
002116 
177772 
177756 
000000 


000001 
002116 
177772 
177756 
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-SBTTL WAITF 


- WAIT FOR SUBSYSTEM READY 


; SUBROUTINE TO WAIT FOR THE SUBSYSTEM READY FLAG 


: INPUTS: 


OUTPUTS: 


3$: 
4$: 


RO 
CARRY 


ADDRESS OF FIRST DEVICE REGISTER 


CONTENTS OF LAST TSSR READ 
READY BIT SET 


SET - 


CLR - TIMEOUT WAITING FOR READY 
; DO A SUPVSR BREAK FIRST. 


sBIG MSEC TIMER 
100US 





a1(PC)s 
LSDLY.(PC)* 
-6(PC) 

a 

-22(PC) 
.-20 
TSSR(RS) RO 
RO 

38 

i 

#1, (PC)+ 
LSOLY,(PC)+ 
-6(PC) 

a4 

~22(PC) 
(SP) 

2$ 


43 


(SP)+ 
PC 


CSBRK 
#10000 ,-(SP) 


sDELAY 


sREAD THE 1SSR REGISTER 
sTEST FOR READY BIT SET 


; EXIT ON STOP FLAG. 
; WAIT 100 USEC 


sREDUCE DELAY COUNT 
sRETRY UNTIL TIMER EXPI 


= 0, CONT 
“UP AFT 
CONTROLL 


RES 
yi STILL RUNNING... 
R 300 MS 


= 1, IS STOPPED. 
RESTORE STACK WITHOUT CHANGING CARRY SIT 


— —— 


— — — ——— —— — — — — — — — — — — —— 


ee 


3 

3191 
3192 

3193 017054 
3194 a 54 


8* Nad LA Gat Cal td 

= ot 
ARAN SSBIEM 
2 2 So 
22 ed et ed od 

~~ 

0 


eceses 
BRET Et te 


CZTUWAO TUSO FRONT END PRT A 
CHKTSSR = CHECK TSSR FOR READY 


016740 
016534 
100000 
074000 


¢c 7 
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~-SBTTL CHKTSSR - CHECK TSSR FOR READY 


“* 


THIS ROUTINE WAITS FOR READY IN THE TSSR 
AND TESTS FOR AMBIGUOUS BIT SETTINGS IN TSSR. 


‘INPUT: 
: R5 ADDRESS OF CSR REGISTERS 
OUTPUT: 
; RO CONTENTS OF TSSR 
; CARRY SET = OKAY 
; CLR - NOT READY AMBIGUOUS, OR SC SET 
CHKTSSR: 
PC ,WAITF sWAIT FOR READY 
BCC 208 sBRANCH IF TIME OUT 
JSR PC, CHKAMB sTSSR AMBIGOUS? 
BCC 10$ °BR If YES 
BIT #SC,RO ; SPECIAL CONDITION SET? 
BEQ 15$ sBR I 
BIT #<SCE BIE! RARINXM>, RO ;ANY ERROR BITS SET? 
BEQ 15$ sBR I 
10$: cic sSET FAILURE 
RR 208 : 
15$: SEC sSET SUCCESS 
208: RTS PC sRETURN TO CALLER 


SEQ 80 


— —— — — — — 


— — — — — —— — — — LL — — — — — — 









Ww 
88 


— ee — ee — ceed ced — 





32 


8888828888 
DOVAARAN=S 


14 
22 
30 
32 
34 
36 
40 
&4 
46 
50 
54 
56 
56 
62 
64 
66 
70 
72 


5 
3 


22222222 
Ssssssssssss 


8* 
2888 





CZTUWAO TUSO FRONT END PRT A 
XNA 


012737 
01 


017146 000004 
000200 000006 


000002 


017156 


000004 


002136 
002152 


002164 





-0 7 
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~ CHECK FOR NONEXISTENT MEMORY 


-SBTTL XKNXM = CHECK FOR NONEXISTENT MEMORY 


S ROUTINE TO TEST FOR A NEXM IN THE RANGE (R1) THRU (R2). 
ON RETURN, IF ‘*’ = 1, (RI) = NEXM ADDRESS. 
C= 0, ALL ADDRESSES OK. 


sCALL: MOV ADR1,R1 


XNXM: MOV 823,084 


MOV ADR2.R2 
JSR PC .NXA 
RETURN sTEST ‘’C’* AND PROCEED. 


; SET BUSERR VECTOR. 
MOV os 





CLR LAG. 
1$: TST (R1) TEST THE ADDRESS(ES). 
TRAP, CONTINUE AT 2$. 
CMP R1,R2 SOTHERWISE, CONTINUE HERE. 
BEQ 3$ ;BR IF FINISHED (NO NEXM’S). 
ADD #2,R1 sSET NEXT ADDRESS... 
BR 1$ 3eeeAND CONTINUE. 
23: R3 * 3601 ONE, SET FLAG... 
MOV #3$, (SP) 
RTI 3eeeAND DISMISS INTERRUPT... 
- CLRVEC #4 3eeeAND GIVE BACK THE VECTOR. 
MOV #4,R0 
TRAP CSCVEC 
TST R3 sDID WE CATCH ONE ?? 
BEG 0 +4 :NO, “C*’ = 0, SKIP NEXT. 
SEC 3 YES, ress = 1, (R1) = NEXM ADDR. 
RTS PC 


em@ee Ge Ge Ge Ge Ge % 


eSBTTL TSTLOOP - CHECK ITERATION COUNT 


” suBROUTINE TO ey TEST ITERATIONS. 
EXIT WITH “'C’* SET 





LOOPS ALLOWED AND LOOP COUNT NON-ZERO. 
LOOP COUNTER IS ser BY “BEGIN. TEST” MACRO. 


CALL: LOOPTO ARG 


TST NOITS ; ITERATIONS INHIBITED? 
St  QvP > NO. 
BM! 1$ “LOOPS DISALLOWED IN QUICK PASS. 
DEC LOOPCNT : BUMP LOOP COUNTER. 

1$: cue i‘. LOOP DISALLOWED, OR DONE. 

2$: SEC LOOP ENABLED. 

3$: RTS PC 





SEQ 81 


— — — — — 


—e 7 
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TSTLOOP = CHECK ITERATION COUNT 













3260 

3261 

3262 : .SBTTL TSTSETUP = PRINT TEST NAME AND INIT ERROR COUNTS 
: PRINT THE NUMBER AND NAME OF EACH TEST AS WE GO ALONG. 

3265 INCREMENT ''TESTK'’ TO INDICATE THE NUMBER OF TESTS 

3266 ; IN THE CURRENT RUN SEQUENCE. 

3267 > CLEAR THE ERROR COUNTER AND SIGNATURE EXTENSION FLAGS. 

3269 INPUT 

3270 ; 

3271 : RO POINTER TO TEST ID ASCIZ STRING 

3273 *QUTPUT: 

3274 3 

3370 RS ADDRESS OF FIRST DEVICE REGISTER 

3277 S IMPLICIT OUTPUTS: 

$279 TSTCNT UPDATED TO COUNT TESTS PERFORMED SINCE START OR RESTART 

3281 SSIDE EFFECTS: 

3283 : INTERRUPT LEVEL IS RASIED TO LEVEL OF 

tt ; THE DEVICE UNDER TEST 


TSTSETUP: : 
"OV 





sesceessacs 
oom 
BRR 
Soe 
























72 sSAVE THE TEST ID MESSAGE 
> CLEAR SOFT INIT’ FLAG 

017234 : COUNTER. 

017240 : NSION FLAG. 
3293 017244 : TERRUPT MASK (CHECK ERROR) 

017250 : IT : 
3295 017254 : 4.2 AND MAKE IT A WORD OFFSET. 
3296 or : DID STARTUP FIND THE DEVICE? 
8 1 < BR IF YES 

01 3$ BR IF NOT IDL 
3299 01 003130 #160000.ERTABL (ROD > FLAG ERROR IN THE ERROR TABLE 
3300 01 > NO DEVICE HERE -- PRINT IT 

01 8 * 

01 

01 NER 

or NXRERR 
3301 1 BR 

01 003130 3S: BIS #160001 JERTABL(RO) ; FLAG ERROR IN THE ERROR TABLE 
3303 01 ERRDF 2,NOINIT : DEVICE NOT IDLE 

or a enor 

ot NOINIT 
3306 01 003060 28: 8-1, DUFLG : DROP THE UNIT 
3305 01 UNITN 

01 UNI TN, RO 

017336 C$D0DU 
tins 017340 Cerne ll Oe 


SEQ 82 


— m— ————— —— — — ⏑ — — — —— — N — 


017340 
3307 017342 0004 
3308 


3309 017344 


3310 01 
33174 017352 . 


3312 01 
3313 OTe aee 


017374 
3314 017400 
3315 0174046 
017404 


017410 
3316 017412 005 


3317 017414 
3318 017420 
3319 017422 
3320 


CZTUWAO TUBO FRONT END PRT A 
TSTSETUP - PRINT TEST NAME ANC INIT ERROR COUNTS 


001000 
017422 
000002 


000006 
002162 
002160 


002154 
123 


MACRO #1200 


4$: 


1$: 


5$: 


045 TNAM: 





TRAP 
BR 





RFLAGS 
TRAP 
BIT 
BE 








MOV 
PRINTF 
MOV 





CSOCLN 
5$ 








; 7 
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PC 
"ZSZTZA Test’ 


; GET THE OPERATOR FLAGS. 
‘ —39 THE TEST NUMBERS? 


sGET THE ID MESSAGE 
sDISPLAY THE TEST ID 





BUMP TEST COUNTER. 
PRIORITY THAT OF DEVICE 


sFIX UP THE STACK 
; ADDRESS OF TSV REGISTERS ON UNIBUS 


— — — — — — — — — — — 


SEQ 83 


01 
3331 017472 


seat 

3335 017474 
3334 017476 
3335 017515 








9 
3350 017612 
3351 017614 
3352 017616 








Scocssssssssss%s = 
SSSSRREEREERSRESRE 


ooo 
— 











CZTUWAO TUBO FRONT END PRT A 
TSTEND = PRINT ERRORS RECEIVED 


7 020000 


017474 
017476 
000002 


122 


017474 
002150 


700 003130 





10 
: 007777 


002150 
003150 
170000 
002142 


? 017474 


$2760 000040 


177777 
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040 
122 


002140 


—— — Ee -- — 


~SBTTL TSTEND <= PRINT ERRORS RECEIVED 


i 


BIT 


PRINTF 


1$: RTS 
ERRK: 


ESUM: 
EMAXDU: coy 


~SBTTL 


1$: 


CKEMAX : 


18: RFLAGS 
RAP 








/ZA ZDZA_ ERRORS/ 


; AT END OF EACH TEST, PRINT THE NUMBER OF ERRORS RECEIVED 
; IF NORMAL ERROR REPORTING IS DISABLED (FLA: IER). 


STEND: RFLAGS RO 
TRAP CSRF 


; BR IF ‘IER’ NOT SET. 
; PRINT ERROR COUNT. 


LOCAL ERROR COUNT. 


/ERROR LIMIT REACHED -- DROPPING UNIT/ 


5 INCERK - INCREMENT LOCAL ERROR COUNT 
> ROUTINES TO INCREMENT LOCAL ERROR COUNT AND CHECK FOR LIMIT: 


ERRK 
RO,-(SP) 
UNI TN, RO 


= RO 
#7777, (RO) 
1$ 

CRO) 
(SP)+,RO 

PC 

RO,-(SP) 
UNITN,RO 
ERTABL (RO) .RO 
#170000 ,RO 
RO, GERRMAX 
ERRK .LERRMAX 





RO 
CSRFLA 
#10U,RO 
2s 


#-1,DUFLG 
4 ,ERAXOU 
CEEROF 





INCREMENT LOCAL ERROR COUNT 
VE RO 





OVERFLOW THE FIELD? 
BR IF NO. 
YES -- BACK IT UP TO 7777. 
RESTORE RO 
RETURN TO CALLER. 








SAVE RO 

GET UNIT NUMBER 

oo. AND MAKE IT A WORD OFFSET 
GET ERROR TABLE ENTRY 
EXTRACT ERROR COUNT FIELD 

8 ee LIMIT EXCEEDED FOR THIS UNIT? 
IS LOCAL LIMIT EXCEEDED FOR THIS TEST? 


GET OPERATOR FLAGS 
1S DROPPING INHIBITED? 


BR IF YES. 
NO -- DROP THE UNIT 






















— ——— — — 


SEQ 84 





H 7 


A — — ~ — - 
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: RESTORE RO 
TURN TO CALLER 





PC E 
oSBTTL FATCHK = INC FATAL ERRORS AND CHECK FOR LIMIT 


CHECK FATAL COUNTER, AFTER INC, FOR MORE THAN 25 
ERRORS AND IF OVER CALL UNIT DROP ROUTINE 


INCERK = INCREMENT LOCAL ERROR C 
017702 000000 - WORD 
3368 017704 DODU UNITN 
017704 013700 002150 mOV UNITN,RO 
017710 104451 TRAP 
3369 arene DOCLN 
017712 104444 TRAP CSDCLN 
17714 012600 23 MOV (SP)¢,RO 
3371 017716 000207 RTS 
30 
3378 3° 
3379 017720 FATCHK 
3380 017720 SAVREG 
3381 017724 013701 002150 MOV UNITN,R1 
017730 30 ASL 8 
000001 003130 ADD #1 ERTABL(R1) 
7 INC FATFLG 
002170 000031 cMP FATFLG.#25. 
BLT 9% 
RFLAGS RO 
TRAP CSRFLA 





0400060 
017772 


BIT #B1T14,R0 
BNE 98 
JSR — 


sBETTER SAVE THE REGISTERS 
sPICK UP THE UNIT NUMBER 
MAKE IT INTO A BYTE OFFSET 

1 TO THE PROPER UNIT’S ERROR COUNTER 
: BUMP FATAL ERROR COUNTER 


AGAINST 
CBR. IF LESS THAN 25 ERRORS 
READ THE FLAGS INTO RO 
















LOOP ON ERROR IS SET 


sBR, IF 
[OTHERWISE NEVER BE ABLE TO SCOPE ETC. 
sDROP UNIT IF ALLOWED 


sOETURN | ETC 








CZTUWAO TUSO FRONT END PRT A 


CKDROP = CHECK IF UNIT SHOULD BE 


1 7 
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DROPPED 


a \SBTTL CKDROP — CHECK IF UNIT SHOULD BE DROPPED 
: CHECK IF UNIT SHOULD BE DROPPED 









010046 RO,-<SP) 
7. 1$,NOTSSR 

104421 CSRFLA 

032700 000040 #10U,R0 

001010 1 

4 011600 (SP) RO 
6 012737 177777 003060 or 
013700 002150 UNITN,RO 
104451 TRAP CS$DO0DU 
DOCLN sABORT THE PASS 

104444 TRAP CSDCLN 

012600 18: MOV (SP)+,RO0 
3410 36 000207 RTS PC 
3411 
3412 
3413 
3414 
33 -SBTTL CONFIG = DETERMINE CONFIGURATION OF SYSTEM 
ttf s SUBROUTINE - DETERMINE CONFIGURATION OF TUSO SYSTEM. 
3419 020040 CONF IG: 
3420 020040 004737 016464 JSR PC, SOF INIT 
3421 020044 000207 RTS PC 
3422 
3423 ; 
33 3 SUBROUTINE - ENABLE MEM AGT. 
3426 005737 003100 KTON: TST KTFLG : GOT KT? 
3427 020052 001403 BEQ $ : NO. 
3428 020054 012737 000001 177572 MOV #1,SRO0 : YES. ENABLE KT11. 
oa 020062 000207 1$: RTS PC 
34 
3431 : 
a3 : SUBROUTINE - DISABLE MEM MGT. 
3434 005737 003100 KTOFF: TST KTFLG : GOT KT11? 
3435 70 001405 BEG 1$ 3 NO. 
3436 72 40 NOP 
3437 020074 40 NOP 
3438 020076 012737 000000 177572 MOV #0,$40 : DISABLE KT. 
3439 020104 7 1$: RTS PC 


— — et ee — —— — 


37 


7 
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CZTUWAO TUBO FRONT END PRT A 
SETMAP <= SETUP PARG MAPPING 


— — 


3441 
3442 
3443 
3444 
3445 






:* 


~SBTTL SETHAP = SETUP PAR6 MAPPING 


THIS ROUTINE SETS uP KERNEL PAR6 TP _HANDL 








E 
ADDRESS. THE OFFSET INTO THE PAGE 














AN 18 BIT 
3467 18 RETURNED BIASED TO PAR6. 
3449 < INPUTS: 
3450 ; 
3451 : RO HIGH ORDER ADDRESS BITS 
3452 ; R1 LOW ORDER ADDRESS BITS 
3454 OUTPUTS 
: RO OFFSET INTO BLOCK WITH PAR6 BIAS (I.E. THE ADDRESS) 
: CARRY SET IF SUCCESS 
; CLR IF ERROR 
SETMAP: 
SAVREG sSAVE RI-R4 UNTIL NEXT RETURN 
003100 TST KTFLG “SYSTEM HAVE ABOVE 28K? 
BEQ “BR IF NO 
OV nt sR2 [SAVE LOW ORDER BITS 
ASR RO sCONVERT WORD ADDRESS TO 0 32u BLOCKS 
ROR RI “MAKE IT DUUBLE PRECISION 
000177 BIC #177,R1 SALINE FOR LOWER 4K BOUNDAR 
003100 CHP Ri KTFLG SHIGHER THAN EXISTING MEMORY? 
172354 MOV _—s_ RT LAK IPARG “SETUP MAPPING REGISTER PAR6 
160000 BIC #160000 ,R2 “SETUP DISPLACEMENT IN PAGE 
140000 ADD —« #140000.R2 “ADD IN PAR6 BIAS 
MOV —s_-R2,, RO SRETURN IN 
SEC SSET SUCCESS 
BR 15$ : 
10$: cLC “SET FAILURE 
15$: Rts PC * RETURN 








— — — — — — — — — — 
— 





ez 
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FILLMEM - FILL MEMORY WITH BACKGROUND PATTERN 
























8 - SBTTL FILLMEM - FILL MEMORY WITH BACKGROUND PATTERN 
sane ; FILL MEMORY WITH A BACKGROUND PATTERN 
3486 ; INPUTS: 
3487 ; 
3488 ; RO = BACKGROUND PATTERN 
3489 : FREE = FIRST LOCATION AVAILABLE TO DIAGNOSTIC 
* KTFLG = SET TO HIGHEST MEMORY LOCATION IF > 28K. 
3492 : OUTPUTS: 
3493 : 
3494 : NONE 
—8 5 
3497 020212 ¢ILUMEM: 
3498 020212 SAVREG sSAVE R1-R5 UaTIL NEXT RETURN 
3499 020216 004737 020064 JSR PC .KTOFF DISABL 
3500 020222 01000 MOV 0,R3 sCOPY TEST PATTERN 
3501 020224 013701 003072 MOV FREER GET inst FREE LOCATION 
502 020230 013702 003074 MOV FRESIZ.R2 3S1ZE OF FREE SPACE BELOW 28k. 
3503 020234 010321 108: MOV R3,(R1)¢ sSTORE A BACKGROUND WOR 
3504 020236 00530 DEC ne ALL MEMORY IN FREE SPACE? 
020240 003375 BGT 10$ nO 
3506 020242 005737 003100 TST KTFLG 
3507 020246 001452 BEQ 55$ OUT. 
3508 020250 737 020046 JSR PC,KTON : ENABLE KT. 
3509 0202 5 CLR R HIGH ORDER ADDRESS STAR 
ee 020256 013701 003104 3*. — “GET >28K START ADDRESS UN 32W BLOCKS) 
3512 CLC sCLEAR C BIT 
3513 ROL x" sCONVERT BLOCKS TO WORDS 
erie a. RO SMAKE IT DOUBLE PRECISION 
3516 020326 737 020106 JSR PC, SETMAP sSETUP PAR6 MAPPING REGISTER 
3517 020332 010320 30$: R3,(RO)+ : STORE Test PATTERN IN >28K ADDRESS 
3518 020334 020027 160000 RO,#1 sEND OF PAR6 MAPPING AREA? 
3519 020340 103774 :BR IF NO 
3520 020342 162700 020000 #20000 ,RO BACKUP INTO PAR6 MAPPING BEGIN 
3521 020346 737 000200 172354 #200 ,@#KIPAR6 :POIN NT TO NEXT 4K BLOCK >28k. 
3522 020354 023737 172354 003100 @SKIPAR6,KTFLG :END OF MEMORY? 
3523 020362 001402 50$ sBR IF YES 
3524 020364 000137 020332 30$ KEEP GOING ON ETC. 
3525 020370 004737 020064 508: PC .KTOFF s DISABLE KT. 
sa50 020374 000207 55$: PC 
3528 


— — — — 


CZTUWAO TUBO FRONT END PRT A 
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CAPMEM = COMPARE MEMORY TO N BACKGROUND PATTER 





i 


15$: 





~SBTTL CMPREM = COMPARE MEMORY TO BACKGROUND PATTERN 


- = BACKGROUND PATTERN 


FREE 
KTFLG 


; ; OUTPUTS: 


CARRY 
CARRY 


ERRHI 
PD 
RECV 


SAVREG 
MOV 





ROL 
ROL 
~END 
BIC 
MOV 
MOV 
JSR 
MOV 
MOV 
MOV 
CMP 
ei 


:+ 
; COMPARE MEMORY WITH A BACKGROUND PATTERN 
; ; INPUTS: 


= FIRST LOCATION AVAILABLE TO DIAGNOSTIC 
= SET TO HIGHEST MEMORY LOCATION IF > 28K. 


- SET IF NO ERROR 


- CLR IF ERROR 
; ; IMPLICIT OUTPUTS: 





E 
- RECEIVED DATA 


—* 
W.. 
R2 


108 
KTFLG 
558 

PC .KTON 
— 
R1 


#177,R1 
RO,-(SP) 
R1,-(SP) 


R3,(R 
32 
002202 vy _RO,ERRH | 








sSAVE R1-R5 UNTIL NEXT RETURN 
; COPY yy =a TTERN 


sDISABLE K 

GET FIRST "Free LOCATION 

sSIZE OF FREE SPACE BELOW 28K. 

SPREE SPACE LOCATION EQUAL TO EXPD? 
SAVE ADDRESS IN ERROR 

sNO HIGH ADDRESS 

3SAVE EXPD FOR ERROR REPORT 

SAVE RECV FOR ERROR REPORT 


POINT TO NEXT ADDRESS 
DONE ALL MEMORY IN FREE SPACE? 














ENABLE KT. 
SHIGH ORDER ADDRESS STAR 
GET >28K START ADDRESS UN 32 BLOCKS) 


— BLOCKS TO WORDS 
MAKE IT DOUBLE PRECISION 











sALINE 4K BOUNDAR 
tre NIGH ORDER 


VE LOW ORDER 
UP PAR6 MAPPING REGISTER 





sRESTORE DE FORMAT 
RESTORE HIGH ORDER IN NON PARG. FORMAT 
ABOVE 28k Oak LOCATION EQUAL EXPO? 


SEQ 89 


ae — — — 


— — — — 
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CAPREM COMPARE MEMORY TO BACKGROUND PATTERN 


SEQ 90 











3587 020556 010137 002204 MOV R1,ERRLO sSAVE LOW wrt IN ERROR 
3588 020562 010337 002176 MOV R3,EXPD SAVE EXPD FOR ERROR REPORT 
0 011437 002200 MOV (R4) ,RECV 3 SAVE RECV FOR ERROR REPORT 
3590 020572 000421 BR 59S 
3591 020574 062701 000002 32$: ADD #2,k1 UPDATE NON PAR6 ADDRESS 
3592 0 005500 ADC RO. sMAKE IT Be PRECISION ADD 
3593 020602 062704 000002 ADD #2 ,R4 [UPDATE PAR FORMAT ADDRESS 
020606 020427 160000 CMP R4 #160000 + END OF PARG MAPPING AREA? 
3595 020612 103755 NO 
3596 020614 162704 020000 #20000 ,R4 :BACKUP INTO PAR6 MAPPING BEGIN 
3597 020620 0627357 000200 172354 #200,@#KIPAR6 POINT TO NEXT 4K BLOCK >28K. 
3598 020626 025737 172354 003100 QAKIPARG,KTFLG END OF MEMORY? 
3599 020634 101744 30 sBR IF NO 
3600 020636 004757 020064 50S: JSR PC .KTOFF sTURN OFF MEMORY MAPPING 
3601 020642 000241 cLC SET FAILURE 
3602 020644 000403 BR 60S : 
3603 020646 0047357 020064 55$: JSR PC ,.KTOFF ;TURN OFF MEMORY MAPPING 
3604 020652 000261 SEC SET SUCCESS 


3605 020654 000207 60S: RTS PC 
3606 


CZTUWAO TUSO 
REGSAV 


FRONT END PRT A 
- SAVE R1-R5 ON STACK 


N 7 
MACRO M1290 29-MAR-83 15:24 PAGE 58 


+ ~SBTTL REGSAV = SAVE R1-R5 ON STACK 


ROUTINE TO 
3 SAVE R1 THROUGH RS ON THE STACK 


CALLING SEQUENCE: 


JSR —«RS,, REGSAV 

;THIS 1S A COOROUTINE WHICH TRANSFER CONTROL BACK TO 
“THE CALLING ROUTINE. AT THE END OF THE CALLING ROUTINE, 
— PC RETURNS CONTROL TO THIS ROUTINE TO RESTORE 


THIS ROUTINE SHOULD ONLY BE CALLED FROM ROUTINES WHICH ARE 
; CALLED VIA A JSR PC INSTRUCTION 


REGSAV: 
BREAK sLOOK FOR CNTL C 


000012 





(SP)+,R4 
(SP)+,R5 


CSBRK 
PC 


sLOOK FOR CNTL C 


SEG 91 
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GETPAT = GET 8 BIT PATTERN FROM OPERATOR 





re — -SBTTL GETPAT = GET 8 BIT PATTERN FROM OPERATOR 
3648 : 
rel sROUTINE TO REQUEST AN 8 BIT DATA PATTERN FROM THE OPERATOR 
3651 s INPUTS: 
3652 : 
3653 : NONE. 
3654 : 
ret sOUTPUTS: 
sean H Ro OCTAL NUMBER FROM THE OPERATOR 
3659 sCALLING SEQUENCE: 
3660 : 
3661 3 JSR PC .GETPAT 
3662 ; 
3663 a 
3664 
3665 020716 
3666 020716 THE GENERAL REGISTERS 
3667 020722 DATASC PATDAT, 0,877. 6. 377,NO 
020722 104443 CSGMAN 
020724 000406 10000$ 
38 020752 PATDAT 
020 000022 TSCODE 
020732 020754 DATASC 
020734 000377 377 
020736 000000 TSLOLIA 
—34 000377 TSHILIA 
3668 020742 BNCOMPLETE 1$ sRETRY IF ERROR 
020742 103367 Bcc 18 
3669 020744 013700 020752 MOV PATDAT,RO sDATA PATTERN FROM OPERATOR 
** 020750 000207 RTS PC sRETURN TO CALLER 
3672 * 
3673 sLOCAL DATA AREA 
3673 ™ 
3676 020752 000000 PATDAT: .WORD 0 TEMPORARY STORAGE FOR DATA 


3677 020754 105 116 124 DATASC: .ASCIZ ‘ENTER DATA PATTERN’ 
3678 VEN 


CZTUWAO TUSO FRONT END PRT A 


GETSEL 


3681 





709 
3710 021229 


010002 
1006 010203 
005715 


001412 
012346 
012746 
012746 


010600 
104417 
062706 


1 
000764 
040 


104443 
000406 
021220 
000042 
021171 
177777 


000000 
177777 


1060 333 


13700 
1 


02000 
70 101411 
012746 


021164 
000002 


021220 
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- ISSUE MENU AND GET OPERATOR RESPONSE 


~SBTTL GETSEL = ISSUE MENU AND GET OPERATOR RESPONSE 


ROUTINE TO ISSUE A MENU AND GET 
; THE —— > RE SPONSE. 


: RO ADDRESS OF ASCIZ STRING OF MENU 
a MAXIMUM ALLOWABLE OPERATOR RESPONSE 
: RO NUMBER OF THE OPERATOR'S SELECTION 
GETSEL:: 










sSAVE GENERAL REGIS.ERS 
sSAVE THE MENU ADDRESS 














RO.R2 > SAVE 
1$: R2,R3 “START OF MENU STRING 
2$: (RS) SEND OF ASCII ? 
3$ “BRANCH IF ALL LINES DISPLAYED 
BSELASC,(R3)+  :DISPLAY THE MENU 
(R3)+, (SP) 
#SELASC,-(SP) 
#2,-(SP) 
3$: 
10001$: 


sRETRY IF ERROR 


:GET THE OPERATOR'S REPLY 
sCOMPARE TO MAXIMUM ALLOWED 


sBRANCH IF OK 
DISPLAY ERROR MESSAGE 





sRETRY 
5$: RTS * RETURN TO CALLER 
MENERR: — “ita, eee Menu Selection Too Large ees" 
MENASC : -ASCIz ‘Enter Menu Selection: ' 


SEQ 93 





3734 021222 
3735 021222 
3736 oe ieee 
3737 021230 


02 
3738 021232 
02 


021246 
3739 021252 
3740 021254 
3741 
3742 021256 
3743 


104450 
103411 


012746 
012746 
0600 


CZTUWAO TUBO FRONT ENE PRT A 
CHKAAN 


021256 
000001 


706 000004 


116 


MACRO Mf 


045 





ree LL LLL —ARów',ß —— — 


M1200 29-MAR-83 13:24 PAGE 61 
- CHECK MANUAL INTERVENTION LEGALITY 


: -SBTTL CHKMAN = CHECK MANUAL INTERVENTION LEGALITY 


“ROUTINE TO TEST SOR MANUAL INTERVENTION LEGALITY. 
: INPUT: 


: NONE. 
OUTPUT: 
; CARRY 0 MANUAL INTERVENTION NOT ALLOWED 


: 1 MANUAL INTERVENTION 1S OK 
SSIDE EFFECTS: 


A MESSAGE IS DISPLAYED WARNING THAT TEST IS 
— — IF MANUAL INTERVENTION IS NOT 


sSAVE THE REGISTERS 
sSEE IF MANUAL INTERVENTION OK 


sBRANCH IF ALLOWED 
sPRINT THE WARNING MESSAGE 


sCLEAR CARRY FOR ERROR 
sRETURN 


"ENZA eee Manual Intervention not Allowed - Test Aborted ***’ 


SEO 94 


EE ii 


CZTUWAO TUBO FRONT END PR 
ENVIRN = SETUP FREE DIAGNOSTIC SPACE 


3745 

3746 

3747 

3748 

3749 021352 
021352 

3750 021354 





“3751 021360 062737 





es 1366 
3755 0213572 162 
3754 021400 


3762 021436 000207 
3765 


— — — —— — — — — 
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003072 
003074 


MOV 
003074 10S: SUB 


.SBTTL ENVIRN 
> SUBROUTINE TO SET-UP VARIOUS ENVIRONMENTAL PARAMETERS. 


ENVIRN: MEMORY RO 
TRAP iC 








- SETUP FREE DIAGNOSTIC SPACE 


; GET 1ST FREE ADDRESS... 


2° FREE 
(RO) ,FRESIZ s..AND WORD COUNT. 
#6, FRESI 
LSUNIT,R2 ; GET NUMBER OF UNITS 
a7 .FRESIZ : TAKE AWAY 7 WORDS PER UNIT 
10 
FREE,RO GET FIRST FREE ADDRESS 
FRESIZ,RO “POINT TO LAST FREE ADDRESS 
#2, “BACKUP 1 WORD 
RO, FREEWI SSTORE LAST FREE ADDRESS 
PC sRETURN 


SEQ 95 | 


—————— eal 


— —— — — —— 
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KTINIT = SETUP KT11 MEMORY MANAGEMENT REGISTERS 





SEQ 96 


-SBTTL KTINIT = SETUP KT11 MEMORY MANAGEMENT REGISTERS 


SROUTINE TO INIT ¥T=11 























3771 
3772 021440 KTINIT: 
3773 021440 005037 003100 CLR —s_xKTFLG ; INIT >28K MEMORY FLAG 
3774 021444 005037 003102 cLRsiéK TENABLE : INIT TEST >28K FLAG 
1450 023727 002120 001577 CMP § LSHIME,@1577 3 GOT ENOUGH MEMORY (>28K)? 
6 021456 101444 BLOS : NO. 
3777 021460 013700 000004 AFERRVEC,RO : SAVE OLD ERR VEC PTR. 
3778 021464 012737 021556 000004 #2$,Q#ERRVEC =; SET ERR VEC PTR. 
021472 005737 177572 TST  aSRO : GOT KT11? 
3780 021476 000240 NOP : (TRAP If NO). 
3781 021500 013737 002120 003100 MOV LSHIME,KTFLG ; ves SET KT FLAG. 
3782 021506 042737 000177 003100 BIC #177 ,KTFLG > 
3783 021514 010037 000004 MOV RO, @FERRVEC : RESTORE OLD ERR VEC PTR. 
3784 021520 CLR 3 RO = AR DATA. 
3785 021522 012701 172340 MOV -« @K IPARO,R1 ; R1 = KI REGS PTR. 
1526 012761 077406 177740 15: MOV #77406, “40cRt) SET “DESCRIPTOR REG. 
3787 021534 010021 MOV : SET KIPAR REG. 
3788 021536 062700 000200 ADD #260,n0 : BUMP AR DATA BY vx“. 
3789 021542 020027 002000 CMP 3 ̃ "5/0" 
021546 001367 BNE is; : NO. 
021550 012741 177600 MOV §«s«#177600,-(R1) =: YES. SET KTPAR7 FOR 1/0. 
* 021554 000405 BR 9$ 
3794 021556 012716 021564 28: MOV 468, (SP) ; SET UP RETURN 
3795 021562 000002 atl : RTL TO NEXT LOCATION 
5797 021564 010037 000004 6S: MOV RO, APERRVEC s RESTORE OLD ERR VEC PTR. 
3799 021570 000207 98: RIS ss PE 
; 1IF OF ONEFILE, .PAGE 





3817 -SBTTL PROTECTION TABLE 
3818 021572 BGNPROT 
LSPROT:: 


1 
19 021572 177777 #177777 177777 WORD <1, -1, “1, -1 ;NO DEVICE PROTECTION REQUIRED. 
: 021602 ENDPROT 





— — — — — — — 


SEQ 97 
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CZTUWAO TUBO FRONT END PRT A 
INITIALIZE SECTION 


-SBTTL INITIALIZE SECTION 


344 
;THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 
sAT THE BEGINNING Or EACH PASS. 


tf START’ OR “RESTART', SET QUICK=PASS FLAG AND BUS-INIT. 


Ti ee eee 





F ““CONTINUE’’, NOTHING IS REQUIRED. 


INSERT TEMPORARY JUMP TO ODT 































INIT 
a"? 

012737 005672 002146 #EPRT1,EPRTSW ;SET UP PRIMARY MESSAGE FOR REPLACEMENT 

005037 003106 SIFLAG ; 
5037 003102 KTENABLE 28K FLAG 
005037 002246 RAMS 12Z sCLEAR RAM SIZE FOR RAMERR ROUTINE 
#EF . CONTINUE 
12700 000036 #EF .CONTINUE ,RO 
104447 TRAP CSREFG 
BNCOMPLETE 1$ 

103023 Bcc 
023737 002150 002012 UNI TN, LSUNIT sUNIT IN RANGE? 

103073 4% sBR IF NO. 
005737 003060 DUFLG sDROPPED UNIT? 

100675 NXTU sBR IF YES 
013701 002150 UNITN,R1 
006301 
005761 003130 ERTABL (R1) 
001521 SETU 
yea theg 040000 003130 ee sDROPPED? 

3:00 NOTHING IF ‘CONTINUE’. 
104432 
- 1$ 

012700 000035 

04447 

sTAKE NEXT UNIT IF NOT NEW PASS. 

103055 
012700 000040 

04467 

103404 

SEF RESTART 

012700 000037 #EF RESTART RO 

1064447 TRAP CSREF G 

BNCOMPLETE 31$ 
103034 2 Bcc 31$ 








31ST PASS, BUS-INIT... 
BRESET BUS RESET. 


TRAP CSRESET 
CLR TSTCNT ss “ss WUIBER OF TESTS RUM IN PASS 





—— — 


— — — — —— 








3864 021740 
3865 021744 
3866 


3867 021746 
3838 


3869 
3870 021762 
66 





Las] 


NSEFSESES 


— —— — cat -4 


CZTUWAO TUBO FRONT END PRT A 
INITIALIZE SECTION 





H 8 
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005037 002170 CLR sO FATFLG 
000406 BR ti‘é‘«SS 
012746 000340 #340,-(SP) 
012746 021766 #203,-(SP) 
137 04604 0.001 
005037 003332 198: SKIPT 
012737 177777 002152 #-1,0VP 
004737 021352 PC ENVIRN 
004737 021440 PC KTINIT 
012700 003130 PERTABL, 
837 003330 _ iN PERTARE 
103774 30$ 
000404 3 
005037 002152 318: ave 
000137 022076 PASRPT 
012737 177777 002150 8-1 UNI TN 
005037 002166 DEVENT 
104422 CSBRK 
005287 002150 UNITN 
023737 002150 002012 UNITN,LSUNIT 
103423 SETU 
012787 177777 003060 8-1, DUFLG 
000401 118 
104446 CSDCLN 
000240 
023727 002012 000001 LSUNIT.a1 
101752 NEUPAS 
737 002166 DEVENT 
001747 WEUPAS 
104421 CSRFLA 
032700 000100 B1SR,RO 
001343 NEUPAS 
104426 CSORPT 
761 NEUPAS 
108: | 
SETU: GPHARD UNITH.RO 
013700 002150 ROV «UNI TN.RO 
104442 TRAP 
BNCOMPLETE NXTU 
103 ace UWKTU 
005037 003060 CLR —s«éUFLG 
005257 002166 INC —dODEVCRNT 
012001 nov «(ROD * RI 
010137 002156 ROY sR’ CSRADOR 








sRESET FLAG 10 ZERO “FATAL ERRORS" 
F THE FLAG is NOT SET 
a DEBUGGER ETC 


sRETURN TO DEBUGGER 
S;@@ENTER THE DEBUGGER 

sCLEAR THE SUBTEST ‘“‘SKIPPER’’ 

32 QUICK VERIFY... 

sSET ENVIRONMENT. 

SINITIALIZE KT MEMORY MANAGEMENT 
sCLEAR THE ERROR TABLE 









360 REPORT THE STATUS 


s INIT UNIT NUMBER. 
sCLEAR COUNT OF DEVICES RUNNING 





3-e.AND SET NEXT UNIT NUMBER. 


sABORT, NO MORE UNITS. 


HOW MANY UNITS SELECTED? 
sBR IF ONLY 1 

SARE ANY STILL RUNNING? 
sBR IF NO 


sSHOULD WE PRINT STATISTICS 
BR IF NO 


7GET UNIT N P-TABLE POINTER. 


sBR IF UNIT NOT AVAILABLE. 
sCLEAR “DROPPED'’ FLAG. 


sGET 1ST REGISTER ADDRESS. 
SADDRESS OF REGISTERS OF UNIT UNDER TEST 


sre 





SEQ 99 
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TUBO FRONT END PRT A 
IZE SECTION 


— — + — 


— — — —— — — — 








































12001 (RO) +,R1 GET VECTOR ADDRE 
11002 (RO) ,R2 “GET INTERRUPT pr 
010237 0021 R2, 1PRI “SET INTERRUPT 
010137 002156 R1 IVEC SSET_ INTERRUPT vE INTER... 
012721 016 —— inn·⸗ po * 
010221 (Ri)* AND PRIORITY. 
18: 
3 TST QvP :1ST PASS ? 
: BEO 5$ :NO, SKIP THE PASS 1 STUFF. 
“1ST PASS, CHECK THAT DEVICE ADDRESSES ARE VALID, AND 
;THAT THE DISPLAY STATUS I$ PROPERLY INITIALIZED. 
013701 002150 UNITN.RI 
052761 100000 003130 #B1115.ERTABL (RI) sSAY DEVICE RUNNING 
005037 005232 Ex XTA CLEAR ERROR EXTENSION FLAG. 
023727 002012 000001 SARE WE TESTING MULTIPLE UNITS? 
101416 :BR IF NO. 
“YES — GET OPERATOR FLAGS. 
104421 
032700 001000 sSHOULD WE PRINT UNIT #? 
001412 sBR ‘ 
SPRINT THE UNIT # 
013746 002150 
012746 022332 
012746 2 
010600 
104417 
062706 000006 
10$: 
7 003062 
002154 SADDRESS OF FIRST REGISTER 
010102 SSTART OF REGISTERS 
062702 000000 SADDRESS OF TSSR REGISTER 
004737 017114 ;TEST BOTH CONTROLLER REGISTERS... 
103005 :..-AND BR IF ALL OK. 
010137 003062 MOV R1.NODEV “FLAG DEVICE AS NON-EXISTENT 
012737 177777 003060 * mOV #1 ,DUFLG “DROP THIS UNIT. 
“FINALLY, SET CPU PRIORITY AND WE'RE DONE. 
Ss: SETPRI #PRIO0 sENWABLE INTERRUPTS. 
2 012700 000000 ROV #PRIO0,RO 
104441 TRAP CSSPRI 
| ENDINIT 
110030: 
104611 TRAP  CSINIT 
045 116 045 PUNIT: 


rely /ENZNZAteeee TESTING UNIT ZD2ZA eeeee/ 
EV 





Sree TU8O FRONT 
ADD AND DROP 


ey —— —— — — —— Se — — 


J 8 
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E 
UNITS SECTIONS 


3958 
3959 


3960 

3961 

a 

3964 

3965 022400 
400 


mr 


0 

3971 022442 
022444 

3972 022446 

3975 

3974 

3975 022474 
022474 
022474 








~SBTTL ADD AND DROP UNITS SECTIONS 


THE ADD-UNIT SESTION CONTAINS THE CODING THAT “—_ A DEVICE 
; TO BE (A) ADDED Tu THE TEST LIST FOR THE FIRST 
: OR (B) RE-INSERTED IF IT HAD BEEN PREVIOUSLY DROPPED. 
















LSAU: 
010001 RO.Rt ; GET UNIT TO BE ADDED (RO) 
052761 100000 003130 F100000.ERTABLCRI) ; SET THE “ACTIVE™ BIT 
042761 040000 003130 #40000, 09 SERTABL(R1) : CLEAR THE DROPPED’ BIT 
1 
012746 022446 
012746 000002 
106417 
062706 000006 
000167 
000026 “WORD L10031-2-. 
045 116 045 18: “ASCIZ /ZNZA UNIT ZD%ZA ADDED/ 
“EVEN 
ENDAU : UNUSED. 
110031: 
104452 = TRAP  CSAU 
: THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
TO BE REMOVED FROM THE TEST LIST. 
: SUPVSR DOES THE DROPPING’. THIS IS JUST TO TELL THE MAN. 
: “DROPPED UNITS ARE RE-SELECTED ON OPERATOR ''STA' OR ‘‘ADD'’ 
; RUISE REMAIN INACTIVE. THE DISPLAY’ COMMAND 
; PRINT ALL DROPPED UNITS, AND THE P-TABLES OF THOSE 
: WHICH ARE STILL ACTIVE. 
: UPON ENTRY, RO CONTAINS THE UNIT TO BE DROPPED. 
LSDU:: 
012737. 177777 003060 #1 ,DUFLG 
010001 ROA 
83 140000 003130 #140000 ,ERTABL (R1) s SAY DROPPED 
000240 000240 000240 40 229299299 
010046 
012746 022552 
012746 000002 
010600 
104417 
062706 000006 
000167 
000030 7 


po ye TUSO FRONT END PRT A 


AND DROP UNITS SECTIONS 


3995 022552 

3996 

3997 022602 
022602 
022602 


4006 022646 


56 

4010 022656 
656 

022656 


045 


104455 


012705 
00473 

103420 
012727 
013727 


116 


000550 
7 016740 


000372 
002116 
177772 
177756 


017772 
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045 1$: eASCIZ /2NZA UNIT ZDZA DROPPED/ 

EVEN 

110032: 

, T C$0u 

30 

: AUTO=-DROP CODE SECTION. 
BGNAUTO 

LSAUTO:: 
MOV #360. .R3 

10$: JSR PC ,WAITE :WALT FOR SSR TO SET 
BCs 20$ SLEAVE WHEN SSR_1S set 
DELAY 250. sWAIT FOR .25 SECOND 
MOV #250.,(PC)+ 
WORD 0 
MOV LSOLY,(PC)+ 
WORD O 
DEC -6(PC) 
BNE 74 
DEC =22(PC) 
DEC R3 sBUMP COUNTER DOWN 
BNE 0$ KEEP GOING 

* JSR PC, CKDROP sTRY AND DROP UNIT 
ENDAUTO s UNUSED. 

110033: 
TRAP  CSAUTO 


— — — — 


ENOUGH TIME FOR 2400° REEL TO REWIND 


SEQ 101 


— —— — — 


— — —— — —— — — — — ——s ———— 


— — — — —— 


40 

4032 022702 
022702 

4033 022702 
022702 







Stee TUBO FRONT END PR 


005737 
100405 


012765 
004737 


104412 


012746 


022706 012746 
022712 010600 
022714 












022716 
4034 022722 
4035 022724 
4036 022726 


003060 


000000 
016740 


023144 
000001 





L 8 
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CLEAN-UP AND REPORT CODING SECTIONS 


a" 





~SBTTL CLEAN-UP AND REPORT CODING SECTIONS 


THE CLEANUP COD!NG SECTION CONTAINS THE wot oy THAT IS 
: : EXECUTED AT THE END OF EACH PASS (OR SUB-P 
; _USE TO RETURN DEVICE UNDER TEST TO A NEUTRAL STATE. 


BGNCLN 
LSCLEAN:: 

TST 

BAI 

000000 MOV 

JSR 
18: 
23: ENDCLN 
L10034: 

TRAP 


’ DUFLG 
1$ 


#0, TSSR(RS) 
P ITF 


CSCLEAN 


32eeDON'T TRY TO XCT CLEANUP CODE. 
:D0 SOFT INIT 


;‘DROPPED’’ FLAG IS SET ON... 
¢.eeAND GROSS CONTROLLER FAULT... 


see 
; THE REPORT CODING SECTION CONTAINS THE 
: “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 


LSRPT:: 


1$: 


INTS ADE VAR RS 
spe, =($P) 





GET START OF ERROR TABLE. 
a UNIT 


E 
ZERO IF UNIT NOT 
WAS UNIT DROPPED? 
BR IF YES 
GET ERROR COUNT FIELD 
PRINT 


WAS UNIT NON-EXISTENT? 
BR IF NO 


NUMBER 
RROR TABLE 7 & TEST IT. 


SEQ 102 


— — — — — — — —— — — — — 
— —— — 
— — ———— —— — — — 


— — — — — — —— — — 


CZTUWAO TUBO FRONT END PRT A 
CLEAN-UP AND REPORT CODING SECTIONS 


023030 062706 000006 
000431 
4051 025036 020227 160001 
4052 0 
4053 025044 
023044 


0235335 
000002 


706 000006 
170000 


706 000010 
200002 


7 003530 





4066 
4067 023144 045 116 
4068 025201 


4069 023251 
4070 023535 045 101 
4071 025414 045 101 


4072 
4075 
4082 


4088 
4096 


BR 
3$: 
BNE 
MOV 
MOV 
HOV 
MOY 
TRAP 
ADD 
8R 
30S: BIC 
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SP,RO 
ase 


* 
R2,#160001 ; WAS UNIT NOT READY AT STARTUP? 
BR IF NO 


—2 
RO.RS .R2 


; UNUSED. 
CSRPT 





A rg tag STATUS SUMMARY : 2N/ 
SA T ZD35ZA ONLINE, ERRORS = 2DZN/ 
/EA UNIT ZD3ZA DROPPED, NON-EXISTENT REGISTERZN/ 
/ZA UNIT ZD3ZA DROPPED. NOT READY AT STARTUPZN/ 
/3A UNIT 303A DROPPED, ERRORS = 202N/ 











SEQ 103 


— —— — —— —— — — —— — — — — — — — — — 


— ——— — — — 





CZTUWAO TUBO FRONT END PRT A 


TEST 7%: BUS RESET TEST 


4098 
099 


4109 


Po?) >? oT aT > > 

ed cd ced ced ced ed ced ced ced ed 

PD ced ced ed ed ed ed ed od od ad 

—T "CO VOBW WE! UlWNn—oO 


re 
— 


4146 023506 

4147 —333 

4148 023520 

4149 023520 

4150 

4151 023522 
023522 


rae 

4153 023524 
Oe seSe 

4154 023526 


004737 
012737 
005003 
104402 


104433 
004737 


002170 
005672 


0031 

023700 
017226 
000005 


016740 


—— as - — — — 
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002146 


002164 


oa 
Se Ge Se Ge Se Se Ge Ge Ge Sse Go Ge Ge Ge Se Ge Ge Be Se Ge Se Ge Ge Ge Ge Ge Ge Ge Sse Ge Ge Se Se Ge Ge 


TILOOP: 


-SBTTL TEST 1: BUS RESET TEST 










THIS TES* VERIFIES THAT ys DV132 MODULE’S DEVICE a hl — ARE 
ACCESSIBLE ON THE BUS (SUBTEST 1) AND THEN CHECKS THAT THE 

BUILT-IN ye Mag hh. SELF-TEST MICRODIAGNOSTIC DID NOT FIND 
ANY BASIC PROBLEMS I™ THE MODULE. AREAS OF LOGIC TESTED BY THE 
PIPELINE buat 


T SIGNAL 
ISTER, 





C SEQUENCE TO BE C ETED), AND THEN CHECKS T 

CONTENTS OF THE TSSR REGISTER. SUCCESSFUL INITIALIZATION IS 
INDICATED BY SUBSYSTEM READY (SSR) AND NEED BUFFER ADDRESS (NBA) 
BITS BEING SET (1) AND ALL OTHER BITS (EXCEPT A17 AND A16 = 
OFL. WHICH ARE IGNORED FOR yt TESi) BEING CLEAR (0). IF T 
TP THE EXPECTED DATA, ACTUAL DATA, AND 

THE ERROR REPORT ANALYZES THE TSSR CONTENTS AND DISCERNS AND 
REPORTS ONE OF THREE POSSIBILITIES: 











1. TSSR CONTENTS ARE AMBIGUOUS (ANY OF BITS 11-14 ARE SET, 
OR STATES OF SSR AND SC BITS DO NOT CORRESPOND TO THE 
IN ee 0-5): ste THAT THE 





ERROR (EXECUTION IS ABORTED). FIELD ACTION WOULD BE 10 
REPLACE THE DV132. IF THE OV152 ITSELF IS BEING 
DEBUGGED, THE ?ROGRAM SHOULD BE RESTARTED WITH LOOP ON 
ERROR ENABLED IN ORDER TO PROBE FOR THE PROBLEM. 


2. SSR = 0, SC = 0 AND THE ERROR CODE IN BITS 0-5 IS IN 
THE RANGE 17-13: THIS IS A FATAL ERR THE ERROR 
CODE 1S DECODED AND THE APPROPRIATE DESCRIPTION GIVEN. 
INDICATES THAT A SERIOUS PROBLEM EXISTS. 


BGNTST * 

CLR FATFLG sCLEAR FATAL ERROR F LAG 

MOV #EPRT1 EPRTSW SET UP ERROR MESSAGE SWITCH 

CLR KTFLG sHOLD OFF K KT11 

MOV @TST110,R0 sASCII ge — IDENTIFY TEST 

JSR PC, TSTSETUP D0 INITIAL TEST SETUP 

MOV #5.,LOOPCNT sPERFORM 5 ITERATIONS 

CLR R3 sUSE R3 AS FATAL ERROR FLAG 

BGNSUB 3 BEGIN SUBTEST — — 

"TRAP } CSBSUB 

: ISSUE A BUS RESET 

eee TRAP CSRESET 

JSR PC WAILTE ° WA OR REAL ate oe 


SEQ 104 


TEST 1: 


4155 023532 
4156 023536 
4157 023540 
4158 023544 


4159 023550 0 


* 023552 


166 
4167 8* 
023566 

4168 


016501 000000 
176277 
002200 


CZTUWAO TU8O FRONT END PRT A 
BUS RESET TEST 
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10$: 


INC 
ENDSUB 


TSSRC(RS) RI 
a C<HLADDR:OFL>, »R2 






sGET THE a. OF TSSR 
NTS OF TSSR 


Au 
A SHOULD BE SET 





@SSR'NBA READY NEW DAT 
R1,K2 : COMPARE gO RECEIVED 
ERRNO, SFHERR,SFFASG sREPORT A FATAL ERROR 

“WORD 
R3 sSET THE FATAL ERROR FLAG 

S\ANANVANAANAN END SUBTEST \NNAANANAANAN 
110037: 
CSESUB 


2 — 





— — — — — — — — 


c 9 | 




















SEQ 106. 
CZTUWAO TUSO FRONT END PRT A MACRO M1200 29-MAR-83 13:24 PAGE 68 : | 
TEST 1: BUS RESET TEST | 
4170 023570 005703 TST R3 sDID WE HAVE FATAL ERROR ? | | 
4171 023572 001402 BEQ 208 ;BRANCH IF NOT 
4172 023574 004737 017772 JSR PC ,CKDROP 760 DROP THIS UNIT, IF ALLOWED | 
4173 023600 005003 20$: CLR ez sRESET FATAL ERROR FLAG | 
4175 | 
4176 023602 BGNSUB SIIITIITTITTT BEGIN SUBTEST /////1//114/ 
023602 T1.2: ) 
arr 023602 C$8SUB 
4178 023604 000000 CLR TSSR(RS) sWRITE TO ISSUE A SOFT RESET 
4179 023610 016740 JSR PC .WAITF sWAIT F ADY TO SET 
4180 023614 000000 MOV TSSR(RS) RI 
4181 023620 MOV R1,R 
4182 023622 176277 BIC #*C<CHIADOR!OFL>,R2 
4183 023626 002200 BIS #SSRINBA,R2 sREADY AND NEW DATA SHOULD BE SET 
023632 CMP R1,R2 sCOMPARE EXPECTED TO RECEIVED 
4185 023634 BEQ 1 ;BRANCH IF COMPARE 
189 023636 ERRDF ERRNO, SFIERR,SFFMSG ;REPORT A FATAL ERROR 
023636 TRAP CSERDF 
023640 -WORD 102 | 
023642 d 
023644 
4190 8 — INC R3 ;SET THE ERROR FLAG 
4192 023650 ENDSUB s\AAVAAAAAAAAN END SUBTEST \ANAAAAALAANS 
023650 110040: 
023650 104403 TRAP CSESUB 
die 
4195 023652 005703 TST R3 sFATAL ERROR DETECTED ? 
4196 023654 001402 BEQ 208 ;BRANCH IF NOT 
4197 023656 004737 017772 JSR PC .CKDROP SSEE IF TIME TO DROP UNIT 
023662 004737 017174 208: JSR PC, TSTLOOP ;SHOULD WE DO ITERATIONS ? 
BCC 408 sBRANCH IF NOT 
023520 JMP TILOOP SLOOP UNTIL COUNT EXPIRED 
40S: EXIT TST gALL DONE THIS TEST 


TRAP CSEXIT 
WORD 110036-. 


3+ 
SLOCAL TEXT MESSAGES FOR TEST 


156 151 TSTTID: * *Initialization’ 
ENDTST 


110036: 
TRAP CSETST 





A — — 


— — — — 


0 9 


SEQ 107 
CZ7TUWAO TUBO FRONT END PRT A MACRO M1200 29-MAR-83 13:24 | 
TEST 2: RAM TEST — | 


-SBTTL TEST 2: RAM TEST 


THIS TEST VERIFIES THAT ALL LOCATIONS OF THE RAM ON THE DV132 | 
AN LY STORE AND READ BACK ALL DATA PATTERNS, AND THAT | 






ARTICULAR 
TESTS ARE PERFORMED BY THREE SUBTESTS. DESCRIBED BELOW. A 
BYPRODUCT OF THESE TESTS IS A VERIFICATION OF TWO REGISTERS IN 
THE 2901 AND THE CAPABLITY OF THE 2901 TO CORRECTLY PERFORM AN 





TEST 2, SUBTEST 1: - 


THIS SUBTEST VERIFIES EACH RAM ah BY FIRST PLACING THE 
DV1352 INTO MAINTENANCE MODE BY WRITING INTO THE LOW BYTE OF TSDB 
Swit tuie THE FOLLOWING SEQUENCE FOR EACH ADDRESS 


1. THE —_; TO BE TESTED IS LOADED INTO THE TSDB (VIA A 
WORD WRITE). 


2. THE ADDRESSED RAM LOCATION IS WRITTEN, THEN READ INTO 
THE LOW BYTE OF TSBA, BY WRITING A DATA BYTE INTO THE 
LOW BYTE OF TSOB. 


3. THE LOW BYTE OF TSBA IS CHECKED TO SEE IF IT CONTAINS 
THE DATA ae —“ WRITTEN; A DISCREPANCY IS 
REPORTED AS AN E 


4. THE ADDRESS OF THE LOCATION BEING TESTED IS AGAIN 
WRITTEN INTO TSDB (WORD WRITE). TO CAUSE THE LOCATION 
UNDER TEST TO AGAIN BE READ INTO THE LOW BYTE OF TSBA. 
oF BR OF TSBA IS AGAIN CHECKED AND DISCREPANCIES 


















5. THE HIGH BYTE OF TSBA IS CHECKED; IT SHOULD CONTAIN 
THE SUM OF THE HIGH AND 


LOW BYTES LAST WRITTEN INTO 
TSOB AS 
PROBL 





A WORD.” A DISCREPANCY IS REPORTED AS A 2901 





6. THE CONTENT OF TSSR IS CHECKED; SETTING OF THE SC BIT 
1S IGNORED. OTHER DISCREPANCIES IN TSSR ARE REPORTED. 





BGNTST * 
005037 002170 CLR FATFLG sCLEAR FATAL ERROR FLAG 
012737 005672 002146 MOV #EPRT1,EPRTSU *SET UP ERROR MESSAGE SWITCH 
005037 003100 CLR KTFLG sHOLD OFF KT11 
BGNSUB SPIIIIHUTTAEL BEGIN SUBTEST A////0000011 
023740 104402 "TRAP ss CSBSUB 


~ — — — 
— — —— — 





— — —— — — — — — — — — 


— — 


CZTUWAO TUBO FRONT END PRT A 


TEST 2: 
4272 023742 









275 023769 
4276 023760 
4277 023764 
4281 023766 
4282 023770 
023772 
023774 
023776 





4273 025746 
pe So 023752 


RAM TEST 


024666 
004737 017226 
012737 000002 
7 016464 


7? 000400 


177777 
177776 


000002 


—E 9 
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002164 


T2LO0P: 


208: 
253: 


40$: 


45$: 


MOV 
JSR 
MOV 
SR 
Bcs 
MOV 
ERRDF 








08 


#TST21D,R0 
PC ,.TSTSETUP 
#2, LOOPCNT 


PC, SOF INIT 
20% 


RO,R1 
ERRNO, SFIERR,SF IASG 


#2,R4 


R4,R2 
R4, TSDBH(RS) 
R2, TSDBL 





ERRNO, TSBAM2 ,EXPREC 


R4 
R4 #400 
25$ 


R2 
R4 
R4,R2 

R4, TSOBH(RS) 
TSBAL (RS) Rt 








45 
ERRNO, TSBARZ ,EXPREC 


R4 


sASCII MESSAGE TO IDENTIFY TEST 
300 INITIAL TEST SETUP 
sPERFORM 2 ITERATIONS 

:b0 ee ON CONTROLLER 


:BR 
CONTENTS OF TSSR REGISTER 
SFATAL ERROR TSSR WAS NOT OK 
TRAP ceener 


. SF IMSG 
sSET RAM ADDRESS AT TWO 
s EXPECTED DATA FROM WRAP-AROUND 
sLOAD ADDRESS INTO TSDB 
LOADS DATA INTO RAR LOCATION 
sREADS DATA 


E WRAP DAT 
[DOES WRITTEN(WRAP) = READ 
ARE EQUAL 




















sBR IF OK, THEY 

:DATA NOT WRAPPED CORRECTLY 
TRAP CSERHRD 
«WORD 202 
. TSBAM2 
-WORD EXPREC 

sNEXT ADDRESS 

sEND OF RAM MEMORY CHECK 

SLOOP TILL ALL RAM WRITTEN 

> CLEAR ut R2_ HIGH BITS 

sSET BACK 10 377 

GET DATA PATTERN BACK IN SHAPE 

sLOAD UP RAM ADDRESS POINTER 

READ RAM CONTENTS BACK 

:CHECK WITH DATA WRITTEN 

3BR IF OK, DATA IN = DATA OUT 

WRITTEN DATA NOT = TO READ 
TRAP CSERHRD 
-WORD 205 
-WORD TSBAMZ2 
WORD EXPREC 

sSCOPE LOOP 
TRAP CSCLP1 

sDROP DATA COUNTER (PATTERN) 

sAT LOC TWO Y 


YeT 
BR, IF NOT AT TWO YET 
s\AANAANAAAAAA a, VVVV 
TRAP CSESUS 





SEO 108 | 


TEST 2: 


4320 
4321 024114 
02411 


4 
024114 


4322 
4323 
4326 
4325 
4326 


4327 

4328 024116 00473 
4329 024 

4335 —88 010001 


4334 

024134 
4335 024136 
4336 024140 
4337 024144 


4338 
4339 026144 


4347 024164 
0241 
024166 
25 
024172 

4348 024174 

349 


4 

4350 024174 

4351 026176 
35 202 





ete eet 

FESSRALALAS 
St 
oo 


——— 


104402 





CZTUWAO TUBO FRONT END PRT A 
RAM TEST 


016464 


000400 


177777 
177776 


‘F 9 
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20S: 
258: 


35$: 
40$: 


43$: 











TEST 2, SUBIEST 2 


LLL — SUBTEST //////0//4707/ 


THIS SUBTEST WRITES RAM WITH ALL ZEROS 
THEN WALKS AN ALL ONES WORD DOWN THROUGH MEMORY 


JSR PC, SOF INIT 

acs 20$ 

MOV RO,R1 

ERRDF ERRNO, SFIERR,SFIMSG 
CLR R2 

MOV #2,R4 





se o TSOBH(RS) 


ERRNO, TSBAM2 ,EXPREC 
INC Re 

CHP —séRG , #400 

NE 25$ 

DEC RE 

CLR sR 


R4 , TSOBH(RS) 
TSBAL (RS) ,R1 


2 
R1 RZ 
43 
ERRNO, TSBAMS ,EXPREC 














TRAP C$BSUB 

s00 INITIALIZE ON CONTROLLER 

If INIT WAS 

SCONTENTS OF TSSR REGISTER 

SFATAL ERROR TSSR WAS NOT OK 
TRAP CSERDF 
WORD 2046 
WORD  SFIERR 
WORD - SFIMSG 





37EST DATA = 0 
sSTARTING RAM ADDRESS = 2 





sLOAD ADDRESS INTO TSOB 
; LOADS DATA INTO RAR LOCATION 
sREADS WRAP DATA 
:DOES WRITTEN(WRAP) = READ ? 
Bk IF OK, THEY EQUAL 
DATA NOT WRAPPED —3 














TSBAM2 
EXPREC 


sNEXT ADDRESS 
sEND OF gage CHECK 
BR, MORE RAM TO GO 


sSET BACK 19 377 
SET TO ALL ZEROS 


sLOAD UP THE ADDRESS FOR RAM 
sREAD THE RAM CONTENTS BACK 
SLOOKING FOR 000000 (EXPECTED) 
sBOTH —. BE 00000000 BINARY 
BR, IF DATA IS GOOD 
CHARACTERISTICS DATA NOT A ee 








CSERHRD 
206 


TSBAM3 
EXPREC 








sSET ALL ONES WORD 

sLOAD UP RAM orgs ye POINTER 

sWRITE DATA INTO RAR 
RAM CONTENTS BACK 

; CHECK WITH DATA WRITTEN 





SEQ 109 | 


ee A LL A ——— —— — 


CZTUWAO TUSO FRONT END PRT A 


TEST 2: RAM TEST 


4375 024 
ose 1 
ves 000317 
02 





45$: 


000002 


ERRHRD ERRNO, TSBAM2 ,EXPREC 
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— — — —— — —— — — — — 


sWRITTEN DATA NOT = TO READ 
TRAP 


;SCOPE LOOP 
TRAP 

sDROP RAM ADDRESS POINTER 

sAT LOC 2 YET 

:BR, IF NOT AT TWO VET 

SNNNANAANAAAAN " SUBTEST \NNANNANAAAANN 


" TRAP = CSESUB 





SEQ 110 


— — — — — — — — — — — — — * — 
— - 


— — ——— —— —— 


— — — — 















































SEQ 111 
CZTUWAD ye FRONT END PRT A MACRO M1200 29-MAR-83 13:24 PAGE 72 
TEST 2: RAM TEST 
4384 
4385 024306 BGNSUB 3//444414444//7 BEGIN SUBTEST ///474/77/4/77 
024306 12.3: 
anes 024306 104402 TRAP C$8SuB 
rt > ; TEST 2, SUBTEST 3 
4389 3 THIS SUBTEST WRITES RAM WITH ALL ONES 
—*9— THEN WALKS A ZERO WORD DOWN THROUGH MEMORY 
4 024310 004737 016464 JSR PC SOF INIT 300 gt ae ON CONTROLLER 
4393 024314 103405 BCS 208 BR IF INIT WAS OK 
4397 024316 010001 MOV RO,R1 — CONTENTS OF TSSR REGISTER 
4398 024320 ERRDF ERRNO,SFIERR,SFIMSG sFATAL ERROR TSSR WAS NOT OK 
4320 104455 TRAP CSERDF 
024322 000320 -WORD 208 
024324 003550 -WORD SFIERR 
024326 011506 d SF IMSG 
4399 024330 012702 177777 208: MOV #177777 .R2 sS€T ty AT ALL —5 
4400 024334 012704 000002 #2,R4 °SET RAM ADDRESS AT TWO 
4401 024340 253: 
4402 024340 £>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
024 1044 TRAP CSBSEG 
4403 024342 110465 177777 R4, TSDBH(RS) :LOAD ADDRESS INTO TSDB 
024 110265 177776 R2, ,TSDBL (RS) LOADS DATA INTO RAM LOCATION 
4405 024352 116501 177776 TSBAL ( R5), sREADS WRAP DATA 
0243 120102 R1,R2 DUES WRITTENCWRAP) = READ ? 
7 026 0014 30$ LR » THEY ARE EQUAL 
4411 024362 ERRNO, TSBAMNZ ,EXPREC * DATA NOT — WRAPPED CORRECTLY 
024 1044 TRAP CSERHRD 
024 -WORD 209 
-WORD #TSBAM2 
30s -WORD EXPREC 
ENDSEG 3<<<<66K<K KKK END SEGMENT <<<<KKCKKKKKKC 
TRAP CSESEG 
INC RG :NEXT ADDRESS 
CRP R46 #400 “END OF RAM MEMORY CHECK 
25$ :BR, MORE RAM TO GO 
ot R4 :SET BACK TO 377 
#000377 ,R2 sSET UP EXPECTED DATA REGISTER 
; CLEAN OUT REGISTER 
R4, TSDBH(RS) EC 
TSBAL (RS) ,R1 
4 IF OK CALL ONES) 
ERRNO, TSBANS ,EXPREC MORY CHANGED AFTER ~ . WRITE 
CSERWRD 
TUORD 210 
.WORD TSBARS 
EXPREC 
438: CLR 





:SET UP NEW EXPECTED 





R2 
RG. TSDBH(RS) _ 





— — — — — — 
ee 
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4433 024446 110265 177776 a2, TSDBL(RS) SWRITE DATA INTO RAM 
4434 024452 116501 177776 i a1 SREAD RAM CONTENTS BACK 
4435 026456 120102 SCHECK WITH DATA WRITTEN 
4460 001404 [BR IF OK, DATA IN = DATA OUT 
—38* * oss TSBAM2, EXPREC “WRITTEN DATA NOT = TO READ 
024464 000323 WORD 
024466 026524 WORD 
926479 016164 WORD 
| 72 45$:  CKLOOP sSCOPE LOOP 
026472 104406 TRAP 
442 026474 005304 DEC RG sDROP RAM ADDRESS POINTER 
4ae3 024476 022704 000002 CMP #2,R4 SCHECK LOC T 
sab 024502 001341 BNE 408 “BR, IF NOT AT LOC 2 YET 
4446 026504 ENDSUB S\VAAAAAAAAAAN END SUBTEST \ANANAVAAAAAA 
024506 110044: 
: 024504 104403 TRAP CSESUB 
024506 004737 017174 JSR PC, TSTLOOP ;D0 WE NEED TO ITERATE TEST ? 
4649 024512 103002 acc 638 H IF NOT 
4450 024514 000137 023760 JMP T2L00P CENECUTE AGAIN 
4451 024520 638: EXIT TST ‘ALL DONE THIS TEST 
024520 104432 
024522 000150 
4452 3* 
4453 “LOCAL TEXT MESSAGES FOR TEST 
cass e 
4456 0245246 040 127 162 TSBAM2: .ASCIZ ° Write to TSDB Not Equal to Read of TSBA Low Byte’ 
4457 024606 127 162 151 TSBAMS: .ASCIZ ‘rite To RAM Location Modified Another Location’ 
58 122 141 155 TST2ID: .ASCIZ ‘Ran’ 





72 110041: 
024672 104401 TRAP CSETST 


— — — — — — — — — — — — — — 


CZTUWAO TUBO FRONT END PRT A 
TEST 3: 





COMMAND REJECT 


— —— — — — — — — — — 
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eSBTTL TEST 3: COMMAND REJECT 


THIS TES* VERIFIES THAT ALL COMMANDS OTHER THAN WRITE 
CHARACTERISTICS ARE REJECTED DUE TO THE aoe BUFFER ADDRESS 
(NBA) BIT BEING 7 AND T THE AND TSSR 


) BE IN _TSSR, HA TSBA 
REGISTERS ARE LEFT IN THE PROPER STATE AFTER EACH COMMAND IS 
REJECTED. THIS TEST CHECKS MICROPROCESSOR SEQUENCING, BASIC 
COMMAND DECODING AND DATI DMA HANDLING. THIS TEST CONTAINS Two 
SUBTESTS: SUBTEST 1 SEQUENCES THROUGH ALL COMMAND WORDS (OTHER 
THAN WRITE serge Het eg WITH THE INTERRUPT ENABLE (IE) BIT 
FIES AN INTERRUPT IS NOT GENERATED BY THE 






































HAT AN 
INTERRUPT IS GENERATED WHEN THE C S REJ SUBTEST 1 
SETS UP THE INTERRUPT SERVICE ROUTINE TO FLAG UNEXPECTED 

TS. THE COMMAND WORD IN THE 


INTERRUP COMMAND BUFFER IS 
INITIALIZED TO 100000 (OCTAL) AND THE REMAINING THREE WORDS IN 
THE COMMAND BUFFER ARE SET TO KNOWN UNIQUE PATTERNS. THEN THE 
FOLLOWING SEQUENCE IS PERFORMED: 











1. INITIALIZE THE CONTROLLER BY WRITING INTO THE TSSR; 
PROPER INITIAL CONDITIONS ARE VERIFIED. 


2. TSOB IS WRITTEN WITH ADDRESS OF THE COMMAND BUFFER TO 
START PROCESSING. 


3. THE PROGRAM WAITS FOR SSR TO SET; IF SSR DOES NOT SET, 


AN ERROR REPORT IS ISSUED AND THE TEST IS ABORTED. 


4. THE CONTENTS OF TSSR ARE CHECKED. TSSR IS CORRECT IF 
IT CONTAINS EITHER OCTAL 102206 OR 102306 (BIT 6 
DEPENDS UPON THE STATE OF THE TAPE TRANSPORT) . 


5. THE CONTENTS OF TSBA ARE CHECKED. TSBA SHOULD CONTAIN 
Lys INITIAL COMMAND mao ADDRESS *. F STEP 2) 
US 10 (OCTAL); J.€., TSBA SHOULD POINT THE WORD 
sust AFTER THE COMMAND PACKET (NOTE THAT Py COMMAND 
PACKET WORDS ARE ALWAYS FETCHED). 


6. USING THE MAINTENANCE RODE WRAPAROUND drt A THE 
COMMAND IMAGE BLOCK IN THE DV152°S RAM (LOCA 
501-210 (OCTAL)) ARE CHECKED; THE IMAGE 
~ Rsk. OF THE FOUR COMMAND PACKET WORDS AS SET UP IN 








































THE COMMAND WORD IN THE COMMAND BUFFER IS INCREMENTED 
TO THE NEXT PATTERN NOT CONTAINING WRITE 
CHARACTERISTICS OR IE. 

COMMAND BUFFER WITH 


ARE SEQUENCED WITH PSEUDO-R 
IF THE COMMAND WORD HAS NOT REACHED ITS MAXIMUM VALUE 
(177777¢1), THE TEST SEQUENCE IS REPEATED. 










st 2 PERFORMS SIM'LARLY TO SUBTEST 1 BUT 
WORD AND E 


TIONS 
SHOULD CONTAIN 


THE eee tak THREE WORD OF THE 
ANDOM DATA. 


SEQ 113 


LLL — — — — 
— — 


TEST 3: 


CZTUWAO TUBSO FRONT END PRT A 


% 

4522 024674 
4674 

4523 024674 


4532 8383 
4533 024 
4534 024730 
024730 
024730 
4535 
4536 024732 
024732 


024736 
rh 024740 0 


COMMAND REJECT 


00 
012700 
004 


7 017226 
00000 


002170 


005672 
003100 


000000 
025610 
002720 


016464 


002170 
002172 


7 017054 
000 


200 
177776 


? 016740 


7 017720 





002172 
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002146 


002164 


-WORD _ISINT 


T3LOOP: 


10$: 


15$: 


CAUSES THE IE BIT TO BE SET IN EACH COMMAND WORD AND THEN 


VERIFIES THAT AN 


BGNTST 


TST 


INTERRUPT OCCURS. 














T3:: 
FATFLG sCLEAR FATAL ERROR F 
— zicxi UP ERROR MESSAGE ASwITCH 
KTFLG sHOLD OFF KT11 
STSTSID,RO sASCII MESSAGE * IDENTIFY TEST 
PC. TSTSETUP T SETUP 
#2. ,LOOPCNT 
3 «BEGIN SUBTEST FVV———— 
TRAP C$8SuBs 
#PRIO0 sLOWER PRIORITY TO ALLOW INTERRUPTS 
mOoY #PRIOO,RO 
TRAP CSSPRI 
@TSPACKET .R4 sGET THE ren A COMMAND PACKET 
#TSTBLK,RS SBLOCK OF TEST 
(R34, (RE) s INSERT THE wexT Test DATA WORD 
£>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 
PC SOF INIT :D0 SOFT INIT OF CONTROLLER 
103 sBR IF SOFT INIT = OK 


RO,R1 
ERRNO, SFIERR, SF IASG 


FATFLG 
INTRECV 


RO, 
ERRNO, TSSSR,PKTSSR 


PC .FATCHK 
SUB 


INTRECY 


BEG 
ERRHRD ERRNO, TSINT,PKTSSR 


3SAVE CONTENTS OF TSSR 
sDEVICE FATAL ERROR ef INIT 








CSERDF 
WORD 301 
-WORD SFIERR 
WORD SFIASG 
sCLEAR FATAL ERROR FLAG 
: CLEAR INTERRUPT RECEIVED FLAG 
T AMBIGUOUS 
sBR ARRY S$ 
sSAVE CONTENTS OF TSSR 
SDEVICE FATAL SSR FAILED TO SET 
TRAP CSERDF 
- WORD 2 
- WORD Lt 


WORD PKTSSR 
sINC AND CHECK FOR MORE THAN 25 ERRORS 
LOOP ON ERROR, IF FLAG SET 


RAP _— CSCLP1 
:BY-PASS SUBTEST IF FATAL ERROR 

TRAP CSESCAPE 

WORD 110046-. 


:DID AN INTERRUPT OCCUR ? 
sBRANCH IF NOT 






TRAP 
WOR 


CSERHRD 
303 


SEQ 114 


‘ 
eee — 





CZTUWAQ TUBO FRONT END PRT A 


TEST 3: 


4610 

4611 025236 
4612 025242 
4613 025244 


COMMAND REJECT 





017054 
177776 


010354 


11300 
042700 177740 
000004 


000002 
003030 
024750 


002170 
017772 





aes 
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228: 


30S: 


40$: 


45$: 


50$: 


#@SC!NBA!SSR! TSREJ,R2 
HKTSSR 


PC CHK 
TSSRCRS) RI 
#OFL,RI 
258 


#OFL,R2 
R2 


308 
ERRNO, TMNMBA, PRTSSR 


PC ,CHKTSSR 
TSBACRS) RI 


35$ 
ERRNO, TSTSBA,EXPREC 


PC ,CKRAM 
ERRNO, PKTRAM,.RAMERR 


(R3) RO 
8177740,R0 
RO, #4 

45$ 

MET OLEND 
50$ 

5$ 


a 
PC ,CKDROP 


ee — — —— —— — — 


-WORD PKTSSR 
—*8 Sol ga OF TSSR 
sWAIT FOR R NON-AMB I 





; T OFF-LINE 

T OF IN EXPECTED DATA 
‘DOES EXPECTED MATCH RECEIVED ? 
sDOES EXPECTED MATCH RECEIVED? 
;NBA NOT SET TO REJECT 





CSERHRD 
. 304 
«WORD T3NBA 
WORD PKTSSR 
sLOOP ON ERROR ? 
TRAP CSCLP1 


sWAIT FOR READY, NON-AMBI 
GET TSBA REGISTER CONTENTS 
SSTART OF THE PACKET 

SCOMPARE EXPECTED TO RECEIVED 
ERROR IF NOT EQUAL 

SPRINT THE ERROR & — 


CSERHRD 









T3TSBA 
EXPREC 


SEE IF DATA IN RAM IS CORRECT 
SBRANCH If PACKET IN RAM IS CORRECT 
SREPORT THE RAM ERROR(S) 


TRAP CSERHRD 
-WORD 306 
-WORD PKTRAM 
-WORD RAMERR 
SRKKKKKKKKKKKK END SEGMENT <KKKKKKKKKKKK 
TRAP © CSESEG 


sPACKET COMMAND WORD 

GET BITS 0-4 

“DON'T TEST WRITE CHARACTERISTICS 

‘BRANCH H IF 

3GET NEXT WORD FROM DATA TABLE 

SREACHED END OF TABLE ? 

“BRANCH IF END OF TABLE 

“CONTINUE TEST bITH NEW DATA 

s\AAAAAANANANA END guatest ANAAAAAAAAAAA 
" TRAP = CSESUB 

sANY FATAL ERRORS ? 

“BR 


ANCH IF NOT 
sTRY TO DROP THE UNIT 


eer mt — — — — A 


SEQ 115 


— — — — — — — — 
a — — — 


— ——————————— — —— —— —— — — — — 


TEST 5: 


025250 
4616 
4617 88 


4619 025264 
4620 0252 
4621 Ogee 


104402 


2 012700 
104441 


CZTUWAO TUSO FRONT END PRT A 
COMMAND REJECT 


4615 025250 
025250 


000000 
025610 
0 


012704 
012703 90272 
70 012314 


104404 
004737 
103405 
010001 


104455 
000463 


016464 


7 002170 
002172 
7 017054 
000200 


177776 
016740 


017720 


002172 


102206 
7 017054 
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60S: 


5$: 


10$: 


15$: 


228: 


SETPRI 


#PRi00 


#T3PACKET,R 
aTSTB ToL ERS 
(R3)4, (RO) 


PC, SOF INIT 
10$ 


RO,R1 
ERRNO, SFIERR, SF IMSG 


FATFLG 
INTRECV 
PC,CHKTSSR 
#B1T7, (R4) 
R4, TSOB(RS) 
PC WAITF 
15$ 


RO,RI 
ERRNO, TSSSR,PKTSSR 


PC ,FATCHK 
SUB 


INTRECV 
ERRNO, TSNINT ,PKTSSR 


Spt tems 3eP* TERE Ae 
PC .CHKTSSR 

et’ Ri 

#OF 


L.RI 


#OFL R2 
R2, Ri 


BE 30 
ERRHRD ERRNO, T3NBA,PKTSSR 
nn ld 


SEQ 116) 


SAIIITIIT111T «BEGIN SUBTEST IC“ 





TRAP 


C$8SUB 


SLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV 00,R0 
TRAP CSSPRI 

sGET THE ADDRESS A COMMAND PACKET 

sSTART OF TEST DATA 

PLACE NEXT DATA WORD IN PACKET 

3>>>>>>>>>>>> BEGIN — >>>>>>>>>>>> 
TRAP CSBSEG 


:D0 SOFT INIT OF CONTROLLER 
IF SOFT INIT = OK 


:BR 
7SAVE CONTENTS OF TSSR 
DEVICE FATAL ERROR —Y INIT 








CSERDF 
307 

SFIERR 
SF IASG 


GORD 
8 WORD 
sCLEAR FATAL ERROR 


FLAG 
SCLEAR INTERRUPT RECEIVED FLAG 
WAIT FOR —— 


0 SET 
sBK IF CARRY SET (GOOD RETURN) 
;SAVE CONTENTS OF TSSR 
sDEVICE FATAL SSR FAILED 10 SET 
TRAP _ 


«WORD 
- WORD 
- WORD 
sINC AND CHECK FOF. MORE THAN 25 ERRORS 
;LOOP ON ERROR, IF FLAG * 











CSCLP1 
sBY-PASS SUBTEST IF — _— 
oe 
DID AN INTERRUPT OCCUR ? 
BRANCH IF YES 
;REPORT ERROR IF NO INTERRUPT 
TRAP CSERHRD 
-WORD 309 
~WORD TSNINT 
WORD PKTSSR 
s EXPECTED HS yh OF TSSR 
sWAIT FOR READY, NON-AMBI 
GET THE CONTENTS OF TSSR 
71S a te te rs SET ? 
sBRANCH IF NOT OFF-L NE 
SET OFFeLINE IN EXPECTED DATA 
sDOES EXPECTED MATCH RECEIVED ? 
sOKAY IF MATCH 
;NBA NOT SET TO REJECT 
TRAP CSERHRD 


| 
| 


— 





TEST 3: 


4u82 025524 04 
4683 30 





4689 
4690 025554 
02 


025 
4691 025556 
469 


4704 025606 


4706 025610 
4707 025610 000000 


4708 12 
c708 "25616 


052525 
125252 


CZTUWAO TUSO FRONT END PRT A 
COMMAND REJECT 


5446 025620 
50 011520 


7 917054 


177776 


010354 


177740 
000004 


000002 
003050 
025270 


002170 


017772 
017174 


024730 


30$: 


35$: 


40S: 


45$: 


50$: 


60S: 


62$: 


CKLOOP 


JSR 


BCS 
ERRHRD 


ENDSEG 
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PC, LAHKTSSR 
TSBA(RS), R4 

RG ,R2 

H sR2 

ERRNO, TSTSBA,EXPREC 


PC,.CKRAM 
ERRNO, PKTRAM,RAMERR 


(R3) RO 
#177740,R0 
RO 

45$ 

#2,23 

R3, #TBLEND 
50$ 

5$ 


FATFLG 
60$ 


PC, CKDROP 
PC. TSTLOOP 
628 


T3LO00P 
TST 


3* 
sLOCAL STORAGE FOR THIS TEST 


T3PACKET: 
WOR 


BLKB 


10-<.=-TUV2A87> 


0 
052525 
12525. 


nn — — — — — — — 


- WORD 
«WORD PKTSSR 
sLOOP ON ERROR ? 
TRAP CSCLP1 
sWAIT FOR READY, NON-AMBIGUOUS 
GET TSBA REGISTER CONTENTS 
sSTART OF THE PACKET 
;COMPARE EXPECTED TO RECEIVED 
sERROR IF 
:PRINT THE ERROR & EXPD/RECV 
TRAP SERHRD 
«WORD 311 
«WORD TSTSBA 
«WORD EXPREC 


SEE IF DATA IN RAM IS CORRECT 
sBRANCH IF PACKET IN RAM IS CORRECT 
sREPORT THE RAM ERROR(S) ‘ 


CSERHRD 
312 





“WORD PKTRAM 
RR 


-WORD RARE 
$66 KK KKK KKK END SEGMENT <<<KE<KKKKKKKK 
10000$: 


TRAP CSESEG 
sNEXT PACKET COMMAND WORD 
sGET BITS 0-4 
sDON'T TEST WRITE CHARACTERISTICS 
SBRANCH IF NOT WRITE CHARACTERISTICS 
BY-PASS WRITE CHARACTERISTCS 
sHAVE WE COMPLETED DATA TABLE ? 
BRANCH IF ALL TESTED 
sTEST WITH NEXT DATA 


S\ANANAAAAAAAN END SUBTEST N\ANNNAANAANNA 
L10047: 





TRAP CSESUB 
sANY FATAL ERRORS ? 
BRANCH IF NOT 
sTRY TO DROP THE UNIT 
;SHOULD WE DO ITERATIONS ? 
BRANCH IF NOT 
sLOOP UNTIL COUNT EXPIRED 
sALL DONE THIS TEST 
TRAP CSEXIT 
WORD 110045-. 


COMMAND PACKET FOR TEST 
“WILL CONTAIN VARIABLE COMMANDS 


— 


SEQ 117 


— — — ——— — — sss 


we ' wwe 


TEST 3: COMMAND REJECT 





ra 025616 052525 -WORD 052525 

4712 

4713 3¢ 

4714 sLOCAL TEXT MESSAGES FOR TEST 

ire : 

4717 025620 103 157 155 1Z ‘Command Not Rejected’ 

4718 025645 103 157 156 12 ‘Contents of TSSR Incorrect After Write Packet‘ 

4719 025723 125 156 145 ASCIZ ‘Unexpected Interrupt Received On Write Packet’ 
20 026001 105 170 160 : 1Z ‘Expected Interrupt Not Received On Write Packet’ 

4721 026061 111 156 143 : Z ‘Incorrect TSBA Address After Packet Write’ 

4722 026133 103 157 155 TST3ID: .ASCIZ ‘Command Reject’ 

4723 EVEN 

4726 ose’ 52 ENDTST 


026 L10045: 
026152 104401 TRAP CSETST 


— — — — — — 
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3: COMMAND R 


4 
4754 026154 
026154 


4755 026154 005037 
4756 026160 0127357 
4757 026166 005037 
4762 026172 012 
4763 026176 004737 
4764 012737 
4765 10 
4766 026210 
026210 
Oeesis 104402 
4767 12 004757 
* 
8336 012700 
2 104441 
4770 012705 
4771 012704 
are 34 012764 
& 
4774 
104404 
4775 
4776 026244 004737 
4777 103405 
4781 010001 
4782 54 
N24254 104455 


016464 


002146 


002164 


T4LOOP: 


5$: 


~SBTTL TEST 4: WRITE CHARACTERISTICS 





INTER 


THIS TEST VERIFIES BASIC Pe ae OF 
C IT VERIFIES THE COMMAND 


DAT ATE 
VERIFIED IN SUBSEQUEN NT TES ALL COMMANDS 
TEST HE INTER yt ENABLE (IE) BIT CLEARED TO ZERO, SO 


RUPT SHOULD BE GENERATED. WOWEVER, THE PROGRAM RUNS 
PROCESSOR PRIORITY 0, WITH THE INTERRUPT SERVICE —-, UP 






TO FLAG UNEXPECTED INTERRUP 
PROBLEM EXISTS IN EITHER THE LSI-11 BUS INTERFACE SECTION OR IN 


THE ROM OR PIPELINE. 














TS. IF AN INTERRUPT OCC 


THE WRITE CHARACTERISTICS 
BLOCK AND C 


CTERISTICS 
D BUFFER 








THIS TEST CHECKS VARIOUS MICROPROGRAM SEQUENCES, C 
DECODING, DMA LOGIC, 
IS THE FIRST TEST IN WHICH DATO DMA > ee (FOR STORING 


veay tLe. PACKET) ARE A i gh 


ERRORS 0 


AND BASIC PACKET PROTOC 


OTHER 
THE TRANSPORT BUS) DEFINITELY INDICATE A BAD M7454 


BGNTST 
CLR 


ERRDF 


SaTFLG 
#EPRT1 .EPRTSW 
KTFLG 


sHOLD OFF KT11 
#TST41D,RO sASCII MESSAGE TO IDENTIFY TEST 
PC, TSTSETUP :D0 INITIAL TEST SETUP 
#2. ,LOOPCNT > PERFORM 2 ITERATIONS 
LLL ee ULL 
"TRAP 
PC, T4&REST sSET PACKET TO START-UP VALUES 
#PRIOO sLOWER PRIORITY TO ALLOW perenne =? 
TRAP 
#TSTBLK+10. .R3 sSTART OF TEST DATA 
ST4PACKET ,R4 GET THE ADDRESS OF COMMAND PACKET 
#8. . PKBCNT(R4) > START WITH MINIMUM ALLOWABLE VALUE 
5>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 
PC SOF INIT 3:00 SOFT eet OF CONTROLLER 
10$ 7BR IF SOFT INIT = OK 
RO,R1 * SAVE CONTENTS OF “TSSR 
ERRNO, SFIERR, SF IASG 


14:3 
sCLEAR FATAL ERROR F 


COMMAND 
OL HANDLING. 


IN THE BODY OF 
NAN, INITIALITATION ERRORS RELATED TO 
MODULE. 





THIS 
THE 


THE 


LAG 
SET UP ERROR MESSAGE SWITCH 











SDEVICE FATAL ERROR DURING -* 
———— ⸗ ⸗ 


C$BSUB 


CSSPRI’ 


SEQ 119 


— ——— 


— — — — 
— — —— — — — 


— — — — — —— 





dD 10 


| 
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1 WORD 401 
003550 «WORD SFIERR 
02 011506 WORD  SFIMSG 
02 005637 002170 10$: CLR FATFLG sCLEAR FATAL ERROR FLAG 
4784 026270 005037 002172 CLR INTHECV “CLEAR INTERRUPT RECEIVED FLAG 
4785 026274 010465 177776 MOV R46, TSDB(RS) :SET THE PACKET ADDRESS 
4786 0 004737 017054 JSR PC, CHKTSSR WAIT FOR SSR TO SET 
4787 026304 103407 acs 15$ <BR If CARRY SET (GOOD RETURN) 
4788 026 010001 MOV RO,R1 SAVE CONTEN NTS OF TSSR 
4792 026310 ERRDF ERRNO, T4SSR,PKTSSR SDEVICE FATAL SSR FAILED TO SET 
02631 104455 TRAP  CSERDF 
0 000622 } 402 
027646 . WORD T4SsR 
026316 011520 .WORD  PKTSSR 
4793 026320 004737 017720 PC .FATCHK ZINC AND CHECK FOR MORE THAN 25 ERRORS 
4794 026326 15$:  CKLOOP sLOOP ON ERROR, IF FLAG SET 
026324 TRAP  CSCLP1 
4795 026326 ESCAPE SEG sBY-PASS SUBTEST IF FATAL ae nronr 
CSESCAPE 
026330 TWORD 10000$-. 
4796 026332 002172 TST INTRECV :DID AN INTERRUPT OCCUR ? 
026 BEQ sBRANCH IF 
1 026 ERRHRD ERRNO, T4iNT,PKTSSR 
026346 
026350 000000 228: nov TSSRIRS) RI GET THE CONTENTS OF TSSR 
4803 026354 000200 MOV #SSR,R2 sEXPECTED CONTENTS OF TSSR 
026360 000100 BIT 21S OFF-LINE BIT SET 
4805 026364 BEQ sBRANCH IF NOT OFF- LINE 
026366 000100 BIS #OFL R2 2SET OFF-LINE IN EXPECTED DATA 
4807 026372 25$: CMP R2,R1 sDOES EXPECTED MATCH RECEIVED ? 
026374 BEQ 30$ sOKAY IF MATCH 
4812 026376 ERRHRD ERRNO, T4NBA,PKTSSR :NBA NOT ZERO 
026376 TRAP CSERHRD 
026400 eWORD 404 
026402 .WORD 14834 
026406 .WORD PKTSSR 
4813 026406 30$:  CKLOOP sLOOP ON ERROR ? 
026406 TRAP  CSCLP1 
4814 026410 017054 JSR PC, CHKTSSR sWAIT FOR READY, NON-AMBIGUOUS 
4815 14 177776 MOV TSBA(RS) RI “GET TSBA REGISTER CONTENTS 
4816 027240 mov #T4PACKET ,R2 *START OF THE BUFFER 
4817 CMP R1,R2 “COMPARE EXPECTED TO RECEIVED 
4818 88 BEQ z5 sERROR IF NOT E 
4822 0264 ERRHRD ERRNO, T4TSBA,EXPREC sPRINT THE ERROR & EXPD/RECY — 
8388 405 
026434 ; T4TSBA 
026436 .WORD EXPREC 
tse 
4825 626440 004737 010354 35$: JSR PC, CKRAM :SEE IF DATA IN RAM IS CORRECT 
4826 026444 103404 ecs 4 — 55 — IF PACKET IN RAM IS CORRECT 
4830 026446 ERRHRD ERRNO, PKTRAM,RAMERR PORT THE RAM ERROR(S) 
APALLA 1N44SA J _ £SERMRD 





sc LL LLL 


E 10 
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SEQ 121) 


















026450 000626 
026452 004643 
4831 026454 016200 
4832 026456 408: ENDSFG 3 hKKEEKE CCK = SEGMENT <<<<<<<d<<<<< 
026456 10000$: 
026456 104405 TRAP CSESEG 
4834 026460 012364 000006 MOV (R3)+, PKBCNT (RS) sSET THE TEST WORD 
4835 026464 020327 0030350 CMP R3,@TBLEND SHAS ALL DATA * TESTED ? 
4836 88 103002 BHIS 55$ sBRANCH IF ALL DATA DONE 
4637 026472 000137 026242 JMP 5$ ;BRANCH TILL BACK TO ZERO 
4839 026476 55$: ENDSUs S\UAANLAAAANAAN END SUBTEST \ANNANAAANAAN 
026476 L10051: 
026476 104403 TRAP CSESUB 
4841 026500 005737 002170 TST FATFLG sANY FATAL ERRORS ? 
4842 026504 001402 8EQ sBRANCH IF NOT 
4843 026506 004737 017772 JSR PC ,CKDROP sTRY TO DROP THE UNIT 


4844 026512 60S: 


CZTUWAO TUSO FRONT END PRT A 


TEST 





026512 
4856 
4857 026514 
026514 


026520 
4858 026522 





4861 
4862 026536 
026536 


4854 
4855 026512 
026512 


4859 026526 012704 
4860 026552 004 





4: WRITE CHARACTERISTICS 


016464 


002172 


177776 
016740 


002172 
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30 


es 4, SUBTEST 2 


CHECK THAT UNUSED BITS BEING SET CAUSES 





sWRITE CHARACTERISTICS COMMAND TO BE REJECTED 


5$: 


10$: 


15$: 


223: 


BGNSUB 


SETPRI 


MOV 
MOV 
JSR 


#PR100 


@T42DATA,RS 
#T4PACKET .R4 
PC .T4REST 


PC, SOF INIT 
108 


RO,R1 
ERRNO, SFIERR, SF IASG 


INTRECV 
R4 RO 


ROR 
ERRNO, T4SSR,PKTSSR 


SEG 


INTRECV 
ERRNO, TOINT ,PKTSSR 


SHIUIIITITAAT BEGIN SUBTEST VVVIVVVVCVUCVVA 
: csasus 

SLOWER PRIORITY TO ALLOW INTERRUPTS 

mov «PRI 





TRAP CSSPRI 
sSTART OF TEST DATA FOR SUBTEST 
GET THE ADDRESS OF COMMAND PACKET 
RESTORE PACKET TO STARTING VALUES 


3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 





:D0 SOFT INIT OF CONTROLLER 
sBR IF SOFT INIT = OK 
SAVE CONTENTS OF TSSR 
DEVICE FATAL ERROR we INIT , 
«WORD 
- WORD 
- WORD 
sCLEAR INTERRUPT =a FLAG 
START OF THE COMMAND PACKET 
sOFFSET TO THE DATA WORD TO TEST 
sSET THE DATA BITS 70 BE TESTED 
;SET THE PACKET ADDRESS 
WAIT FOR SSR TO SET 
:BR IF CARRY SET (GOOD RETURN) 
3SAVE CONTENTS OF TSSR 
;DEVICE FATAL SSR eee”: Nie 











CSERDF 
408 
T4SSR 





WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 

RAP CSCLP1 
sBY-PASS CHECKS IF FATAL ERROR 

TRAP CSESCAPE 

10000$-. 

3010 AN INTERRUPT OCCUR ? 
sBRANCH IF NOT 

TRAP CSERHRD 

-WORD 409 

WORD TINT 

-WORD PKTSSR 


TSSR(RS),.R1 GET THE CONTENTS OF TSSR — 





Ne ae TUBO FRONT END 


TEST 
489 8* 
489 








026740 
4913 02674 


49 

4921 026762 
026762 
026762 


Oren ae 
0 


ND PRT A 


: WRITE CHARACTERISTICS 


102206 
000100 


000100 


002000 


002000 


000004 
027320 
026526 
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253: 


358: 


57$: 


#SC!SSR!TSREJ!NBA,R2 
#OFL.R1 
ee 


R1,RO 


ERRHRD ERRNO, T42REJ,PKTSSR 





@NBA,R1 
35$ 
ERRNO, T42NBA,PKTSSR 





+ ee 
57$ 
5% 





sLOOP ON ERROR ? 


31S NBA BIT SET ? 
sOKAY IF NBA SET 
sNBA NOT SET 





86h EC END SEGMENT <<<<<ddcdeece 
" TRAP  —« CSESEG 

sPOINT TO NEXT DATA PAIR 

SCOMPARE TO END OF TEST DATA 

[BRANCH IF ALL DATA TESTED 

SBRANCH TILL BACK TO ZERO 

S\AAANANANAAAN END SUBTEST \ANVAAAAAAANA 
110052: 


CSESUB 





SEQ 125. 





H 10 
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0 6 | 
CZTUWAO TUBO FRONT END PRT A $68 te 


TEST 4: WRITE CHARACTERISTICS 





BEEEEEEEEETE 


— 


—R 


SIIIIISSS23SS 





002172 
a 027250 


17777 
7? 016740 







* 


TEST 4, SUBTEST $ 


SUBTEST TO VERIFY THAT A WRITE CHARACTERISTICS COMMAND IS 
sREJECTED IF AN ILLEGAL DATA BLOCK ADDRESS IS ISSUED. 


SETPRI #PRIOO 


MOV @T42DATA,RS 
5$: MOV #T4PACKET ,R4 
JSR PC. T4REST 


PC, SOF INIT 
10$ 








INTRECV 

#1, T4DATA 
R4, - TSDBCRS) 
PC .WAITE 


15$ 








15$: CKLOOP 
ESCAPE SUB 


INTRECV 








228 TSSR(RS), 








RO,R1 
ERRNO, SFIERR SF IASG 


RO.R1 
ERRNO, T4SSR,PKTSSR 


2 
ERRNO, TvIMNI, PXTSSR 


Ry 
@SC'SSR!TSREJ!NBA,R2 
GOFL RI 


— BEGIN_SUBTEST /////////7117 





C$8SUB 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
«I #PRI00 ao 
CSSPRI 


sSTART OF TEST DATA FOR SUBTEST 
3GET THE ADDRESS OF COMMAND PACKET 
SRESTORE PACKET TO STARTING VALUES 





sb0 SOFT INIT OF CONTROLLER 





TS TSSR 
SDEVICE FATAL ERROR ug * 





CSERDF 
WORD 412 
WORD SFIERR 
WORD SFIMSG 
: CLEAR INTERRUPT RECEIVED FLAG 
MAKE ADDRESS ODD 
Set THE PACKET ADDRESS 
WAIT FOR SSR TO SET 
BR IF CARRY SET (GOOD RETURN) 


SAVE CONTENTS OF TSSR 
DEVICE FATAL SSR emcat” —3 SET 




















CSERDF 
° 413 
WORD T4SSR 
WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
CSCLP1 
sBY-PASS SUBTEST IF — 1 


CSESCAPE 
L10055-. 











"WORD 
2010 AN INTERRUPT OCCUR ? 
sBRANCH IF NOT 

TRAP 





CONTENTS OF TSSR 
CONTENTS OF TSSR 
INE BIT SET ? 










— — — — 


— — 


— — — — — —— 


Ths ae TUBO FRONT END PR 
: WRITE CHARACTERISTICS 


052702 
020201 


TEST 
4970 0271 
wd 71 





4999 


2 
—* 
8 


eeeeereeeeeeteeci 





000100 





002170 
017772 
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81S 
25$: CMP 
308: 
35$: ENDSUB 
TST 
BEQ 
JSR 
60S: 
EXIT 





#OFL,R2 
R2,Ri 





R* RO 
R2,K0 
RO, @NBA 








ERRNO, T44REJ ,PKTSSR 


#NBA,R1 





FATFLG 
PC ,CKDROP 
TST 


3¢ 
SLOCAL STORAGE FOR THIS TEST 


-BLKB 
T4PACKET: 


T4DATA: 


10-<.-TUV2A87> 


100004 
T4DATA 
0 

8. 


35$ 
ERRNO, TS2NBA,PKTSSR 


— — ee — —— 


NE IN EXPECTED _ 

TED MATCH RECEIVED 

TCH 

TSSR 

IN ERROR 

S NBA ae BIT IN ERROR ? 
RROR 


If NBA ONLY BAD BIT 
® COMMAND NOT REJECTED 












TRAP CSERHRD 
WORD 415 
-WORD  T44REJ 
-WORD PKTSSR 
;LOOP ON ERROR ? 
CSCLP1 





IS NBA BIT SET ? 
sOKAY IF NBA SET 
NBA NOT SET 











s\ANAANAAAAAAN END SUBTEST \NNANANAAAAAN 
110053: 


CSESUB 
sANY FATAL ERRORS ? 
sBRANCH IF NOT 
sTRY TO DROP THE UNIT 
sALL DONE THIS TEST 
TRAP CSEXIT 
WORD 110050-. 


COMMAND PACKET FOR TEST 

SWRITE CHARACTERISTICS COMMAND, WITH ACK 
SADDRESS OF CHARACTERISTICS BLOCK 
sSTARTING VALUE OF BLOCK SIZE 


CHARACTERISTICS DATA BLOCK 
ADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


; SPACE 
sMESSAGE BUFFER 





SEQ 125 





— —— — — — — 


J 10 
SEQ 126 
CZTUWAO TUBO FRONT END PRT A MACRO M1200 29-MAR-82 13:24 PAGE 77-2 | 
TEST 4: WRITE CHARACTERISTICS 


sTEST DATA FOR SUBTEST THO 
“DATA HAS FORMAT: 


; 1ST WORD OFFSET TO TEST WORD IN PACKET 
: 2ND WORD BITS TO SET FOR TEST 
T42DATA: 
000000 037140 .WOR 0.8115 :B1T6:B179:B1710:B1111181112:81113 





“WORD 4,B1T6!B1T15 
027320 T42D0NE=. 


28 
sLOCAL TEXT MESSAGES FOR TEST 





116 102 101 12 ‘NBA Not Set On morecees WRITE CHARACTERISTICS’ 

127 122 111 C1Z “WRITE CHARACTERISTICS Command Not pageetes 

127 122 111 ASCIZ “WRITE CHARACTERISTICS Not Rejected With Non-Zero Unused Fields’ 
127 122 111 ASCIZ ‘WRITE CHARACTERISTICS Not Rejected With Invalid Block Address’ 
103 157 156 ASCIZ ‘Contents of TSSR Incorrect After WRITE CHARACTERISTICS’ 

125 156 145 ASCIZ ‘Unexpected Interrupt Received On WRITE CHARACTERISTICS’ 

111 156 143 ASCIZ ‘Incorrect TSBA Address Afcer WRITE CHARACTERISTICS’ 

127 162 151 TST4ID: oly "Write Characteristics’ 





K 10 








SEQ 127. 
CZTUWAO TUBO FRONT END PRT A MACRO M1200 29-MAR-83 15:24 PAGE 78 | 
TEST 4: WRITE CHARACTERISTICS | 

5053 
8 aour INE TO RESTO°E COMMAND PACKET TO START-UP (DEFAULT) VALUES 
5058 3* 
5059 
5060 030136 
5061 030136 SAVE THE REGISTERS 
030142 012701 027240 #T4PACKET,R1 sSTART OF THE PACKET 
030146 012721 1 #100004,(R1)+ WRITE CHARACTERISTICS WITH ACK 
§064 030152 012721 027250 #T4DATA,(R1)+ ;ADDRESS OF CHAR DATA BLOCK 
5065 030156 005021 (R1)¢ D ADDRESS 
5066 030160 012721 000010 #8. ,(R1)+ sSIZE OF DATA BLOCK IN BYTES 
5067 34 2 927264 aTABRR, »(R1)¢ ADDRESS OF MESSAGE BUFFER 
0301 012721 600020 MOV #16.,(R1)¢ sLENGTH OF MESSAGE BUFFER 
5070 030176 5021 CLR (R1)+ 
0 005011 CLR CRI) 
5072 030202 207 RTS sRETURN 
5073 030204 ENDTST 
0 L10050: 
030204 104401 TRAP CSETST 





VOLUME CHECK 
5076 
5077 
5078 
5079 
5080 
5081 
5082 
5083 
5084 
5085 
5086 
5087 y 
5088 
5089 
5090 
5091 
5092 
5093 
5094 
5095 
5096 
5097 
5098 
5099 
5100 
5101 \ 
5102 
5103 
104 
5105 
5106 
5107 
5108 
5109 
5110 030206 
030206 
5111 030206 005037 
5112 030212 012757 
5113 030220 0050357 
5118 030224 012700 
5119 030230 737 
5120 030234 012757 
38 030242 
5122 
5123 030242 012704 
ss Has Ser 
ie Hates Sars 
a 0 103405 
5131 0 010001 
5132 030270 
030270 104455 
030272 000765 
003550 
a fas Sut 
5134 0 O10065 





CZTUWAO TUBO FRONT END PRT A 
TEST 5: 
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Se @e Ge Ge Ge Se Ge Se Se Ge Ge Ge Se Se Ge Gs Ge Ge Ge Ge Ge Ge Ge Ge Se Ge Se Ge Ge Ge Ge 
Oe 


TSLOOP: 


5$: 


108: 


-SBTTL 


TEST 5: VOLUME CHECK 


THIS Lig VERIFIES THAT THE VOLUME J (VCK) BIT, A FLAG HELD 
THE 47454 AND APPEARING IN 


TAPE MOTION COMMANDS 





Af IS SET BY sgh ae AND 
RISTICS ye WITH THE 

AFFECT THE STATE OF T 

VOLUME CHECK, THAT OF 







THIS 


THE TEST PROCEEDS AS FOLLOWS: 


1. 
2. 


3. 


4. 


5. 


MOV 
MOV 
JSR 
BCS 


MOV 
ERRDF 


THE CONTROLLER IS INITIALIZED BY WRITING INTO THE TSSR. 


A WRITE CHARACTERISTICS COMMAND IS ISSUED (WITH CvC=0) 
AND XSTO IN THE RETURNED MESSAGE BUFFER IS EXAMINED; 
THE VCK BIT SHOULD BE CLEAR (0). 


9 PREVIOUS STEP 1S REPEATED TO VERIFY THAT VCK DOES 
T CHANGE (REMAINS AT 0). 





lg CHARACTERISTICS COMMAND IS ISSUED a oo 





THE VCK BIT IN XSTO iN THE MESSAGE BUFFER 
EXAMINED; THE VCK BIT SHOULD BE CLEAR (0). 


A WRITE CHARACTERISTICS COMMAND IS ISSUED WITH CvC=0 
AND THE VCK BIT IN XSTO IN THE MESSAGE BUFFER IS 
EXAMINED; THE VCK BIT SHOULD REMAIN CLEAR (0). 








T5:: 
sCLEAR FATAL ERROR FLAG 
:SET UP ERROR MESSAGE SWITCH 
HOLD OFF KI11 


STSTSID.RO ASCII MESSAGE TO IDENTIFY TEST 
PC, TStsE Tur [DO INITIAL TEST SETUP 

#2. ,LOOPC SPERFORM 2 ITERATIONS 
#TSPACKET,R4 PACKET FOR WRITE CHARACTERISTICS 
#TSBER.R2 SAD T SAGE BUFFER 
#052525 ,XSTOCR2) “SET XSTATO TO KNOWN VAL 

PC, SOF INIT 300 SOFT INI 


sSAVE CONTENTS OF TSSR 
;DEVICE FATAL ERROR mT 





even SFIERR, SF IMSG 
. : CSERDF 
501 
SFIERR 
SFIMSG 


#B1T14, (R4) sCLEAR THE CVC BIT 








SEQ 126 


— — —— — 


5135 030310 
51 14 


030326 
5142 0303350 
5143 030352 
030332 
030334 
5144 030356 
5145 030342 
5146 030346 
5147 030350 
5151 030354 
030354 


030356 
etre 
5152 030364 
5153 030572 
5157 030374 
5158 030400 


004737 


006 
016501 
104456 


030400 
030402 000770 


030404 
30406 
5159 pea nh 


5178 030470 


031045 
011574 


031121 
011574 


104406 
032762 


CZTUWAO TUSO FRONT END PRT A 
TEST 5: VOLUME CHECK 


017054 


000006 
052525 


177776 
7 017054 
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15$: 


000006 20S: 


23$: 


25$: 


27$: 


JSR 
BCS 


MOV 
ERRDF 


CKLOOP 
ESCAPE 


BIT 
BNE 


CKLOOP 


PC, CHKTSSR 
15$ 


RO,R1 
E®RNO, TSSSR.PKTSSR 


TST 

XSTOCR2),R3 

RS #052525 
TSSR(RS), 

ERRNO, —33. PKTSSR 


#XSOVCK .XSTOCR2) 
23$ 


TSSRC(RS), 
ERRNO, r50cK2, PKTMES 


R4, TSDB(RS) 
PC.CHKTSSR 
25$ 


RO,R1 
ERRNO, TSSSR.PKTSSR 


TST 


XSTOCR2) RS 
7$ 


TSSR(RS), 
ERRNO, TSHVEK ,PRTRES 


sWAIT FOR oy TO SET 

BR IF CARRY SET (GOOD RETURN) 
3 SAVE CONTENTS OF TSSR 

;DEVICE FATAL SSR hea TO all 









CSERDF 
502 











GORD 

WORD TSSSR 

«WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 

TRAP CSCLP1 
sEXIT IF FATAL ERROR 

TRAP CSESCAPE 

L10054-. 


sSTORE STATUS FOR A WHI LE 
Sage FOR XSTATO OVER WRITTEN (GOOD!) 
F XSTATO HAS BEEN UPDATED 
é SPICK UP TSSR FOR ERROR PRINTOU 
:"'NO MESSAGE PACKET —9 








CSERHRD 
503 








TSNMSG 
WORD PKTSSR 
:1S VOLUME CHECK CLEAR IN XSTO ? 
OKAY IF VOLUME CHECK IS CLEARED 
SCONTENTS OF TSSR FOR ERROR REPORT 
sVOLUME CHECK NOT SET 








CSERHRD 
504 
TSVCK2 
PKTMES 





sLOOP ON ERROR ? 
CSCLP1 


TRAP 
SET THE PACKET ADDRESS FOR WRITE CHAR 
sWAIT FOR SSR T 

3BR IF CARR 2 (GOOD RETURN) 

; SAVE CONTENT S OF TSSR 

:DEVICE FATAL SSR FAILED TO SET 


TRAP CSERDF 
eWORD 505 
eWORD TSSSR 
WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
TRAP CSCLP1 
sEXIT IF FATAL ERROR 
TRAP CSESCAPE 
eWORD 110054-. 
; THE Sey SHOULD NOT HAVE C Dd 
SOKAY IF VOLUME CHECK IS SET 
:CONTENTS OF ye FOR ERROR REPORT 
VOLUME CHECK NOT SET 
TRAP CSERHRD 
eWORD 506 
eWORD TSNVCK 
WORD PKTMES 
;LOOP ON ERROR ? 
TRAP CSCLP1 


_ 000020 000006 30S: Bit @XSOVCK XSTO(R2) s1S VOLUME CHECK SET IN XSTO 2... 


SEQ 129° 


— — — — — —— 


| 
| 


TEST 5: 


5179 030476 
5183 030500 
5184 pea esa 


030506 
0 


at ed at 
ALLENS 


0305 
5185 030514 
0305 
5186 030516 


5187 030522 
5188 030526 


52 
5197 030554 
5198 030562 


5202 030564 
5203 030570 


0 
| oso 011574 ___PKIMES 


001006 
016501 


104456 
000773 
031045 
011574 
104406 
052714 
010465 
004737 
103405 
010001 
104455 
000774 
031211 
011520 
104406 
104410 
000642 
032762 
001406 
016501 
104456 
000775 


030752 
011574 


7 
031121 


CZTUWAO TUBO FRONT END PRT A 
VOLUME CHECK 


000000 


040000 
177776 
017054 


000020 


040000 
177776 
017054 


000020 
000000 


000006 


33$: 


35$: 


40S: 


45$: 


MOV 
ERRHRD 


CKLOOP 


BIT 


ERRHRD ERRNO, —XR PKTMES 
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33$ 
TSSRC(RS), 
ERRNO, TSUCK2, PKTMES 


#B1T14,(R4) 
R4, TSDB(RS) 
PC ,CHKTSSR 
35$ 


RO,R1 
ERRNO, TSSSR,,PKTSSR 


TST 


en. oXSTOCR2) 


TSSRCR —3* 
ERRNO, TSVCX, PXIMS 


#BIT14, (RS) 
R4, TSOB(RS) 
PC ,CHKTSSR 


45$ 


RO,R1 
ERRNO, TSSSR,PKTSSR 


TST 


#XSOVCK ,XSTOCR2) 
TSSR(RS), 


\ 





sOKAY IF 39 CHECK IS SET 
;CONTENTS OF 
sVOLUME CHECK NOT SET 





TRAP 
“WORD 
“WORD 


sLOOP ON ERROR ? 
sSET THE CVC BIT 


TRAP 


TSSR FOR ERROR REPORT 
CSERHRD 
507 

pba 


CSCLP1 


3SET THE PACKET ADDRESS FOR WRITE CHAR 
z4 SSR T 


sWAIT FOR SET 
IF CARRY SET (GOOD RETURN) 
sSAVE CONTENTS OF TSSR 
;DEVICE FATAL SSR FAILED TO SET 
TRAP CSERDF 
° T5SSR 
° PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
TRAP CSCLP1 
sEXIT IF FATAL ERROR 
TRAP CSESCAPE 


- WORD 
s1S VOLUME CHECK CLEAR IN XSTO ? 


sOKAY IF VOLUME CHECK IS CLEARED 
sCUNTENTS OF TSSR FOR ERROR REPORT 


SVOLUME CHECK NOT CLEARED 


sLOOP ON ERROR ? 
sCLEAR THE CVC BIT 


TRAP 


CSCLP1 


SET THE oe" oe FOR WRITE CHAR 


“SAVE CONTENTS OF TSSR 
“DEVICE FATAL SSR FAILED TO SET 


CSERDF 
WORD 510 
WORD TSSSR 
WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
TRAP CSCLP1 
sEXIT IF FATAL ERROR 
TRAP Cy 
eWORD 110054-. 
31S VOLUME CHECK CLEAR IN XSTO . 
OKAY IF VOLUME CHECK IS CLEARED 
SCONTENTS OF TSSR FOR ERROR REPORT 
:VOLUME CHECK NOT CLEAR 
TRAP CSERHRD 
«WORD 511 


TSNVCK 


— 


SEQ 130 


— — —— 


A — —— — —— — — — — — — — — — 








ect 5: VOLUME C i Aa ALRY FICVUU C€CP"FRAR"GS 13:¢€9% FAVE Ff 
Test 5: VOLUME C 
5223 030664 50S: CKLOOP sLOOP ON ERROR ? 
522 $30666 004739 017174 60$ JSR PC, TSTLOOP sSHOULD WE DO ITERATIONS 7 — 
5225 030672 103002 Bcc 6i BRANCH W IF 
$226 030674 000137 030242 JP TSLUOP sLOOP UNTIL COUNT EXPIRED 
030700 : EXIT TST sALL DONE THIS TEST 
030700 104432 TRAP CSEXIT 
030702 000512 -WORD 110054- 
5228 
5229 :+ 
5231 sLOCAL STORAGE FOR THIS TEST 
5 3 
$234 030 -BL 10-<.-TUV2A87> 
5236 030 T5PACKET: sCOMMAND PACKET FOR TEST 
5237 833348 100004 100004 WRITE CHARACTERISTICS COMMAND 
238 030712 030720 ‘ TSDATA s ADDRESS OF CHARACTERISTICS BLOCK 
5239 030714 000000 -WORD 0 
* 030716 000010 eWORD 10 sSTARTING VALUE OF COUNTER 
5242 030720 TSDATA: sCHARACTERISTICS DATA BLOCK 
$243 030720 030732 WORD TSBFR sADDRESS OF MESSAGE BUFFER 
5244 030722 000000 WORD 0 
5245 030724 000020 -WORD 16. sLENGTH OF MESSAGE BUFFER 
8* 030726 000000 000000 -WORD 0,0 
$500 030732 TSBFR: .BLKW 8. sMESSAGE BUFFER 
§250 
5251 3* 
525 sLOCAL TEXT MESSAGES FOR TEST 
33 * 
§255 030752 126 103 113 TSVCK: .ASCIZ *VCK Bit NOT Cleared After WRITE CHARACTERISTICS With CvyC=1° 
5256 031045 126 103 113 TSYVCK2: .ASCIZ ‘VCK Bit NOT Set After INITIALIZE With CvC=0° 
$257 031121 126 103 113 TSNVCK: .ASCIZ ‘VCK Bit Modified After WRITE CHARACTERISTICS With CvC=0° 
§258 031211 103 157 156 TSSSR: .ASCIZ ‘Contents of TSSR Incorrect After Write Characteristics 
5259 031300 116 157 040 TSNMSG: .ASCIZ ‘No ——— Packet Returned To Host After WRITE CHARACTERISTICS’ 
§260 031377 126 157 154 TST5ID: .ASCIZ ‘Volume Check 
5261 EVEN 
$262 031414 ENDTST 
031414 110054: 
031414 104401 TRAP CSETST 


c 11 
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TEST 6: COMPLETION INTERRUPT 


-SBTTL TEST 6: COMPLETION INTERRUPT 


— — — — 


THIS TEST vg THAT AN INTERRUPT IS GENERATED AT THE 
COMPLETION OF THE WRITE CHARACTERISTICS COMMAND IF THE INTERRUPT 
ENABLE (IE) BIT IN THE COMMAND HEADER WORD IS SET. THIS TEST 
CHECKS THE FUNCTIONING OF THE INTERRUPT LOGIC AND BASIC 
PROCESSING OF THE IE BIT. 


THE SEQUENCES OF TEST 7 ARE ett EXCEPT THAT THE INTERRUPT 
S SET UP TO EXPECT INTERRUP EACH WRITE 








TWO COMMANDS ARE ISSUED, 

AND THE SECOND WITH IE=0. IT IS wee” Har 
NO INTERRUPT IS GENERATED AFTER THE SECOND COMMAND AND THAT T 
IE BIT IN XSTO IS 0. 



















BGNTST 
005037 002170 CLR FATFLG SCLEAR FATAL ERROR FLAG 
012737 005672 002146 MOV #EPRT1 EPRTSW °SET UP ERROR MESSAGE SWITCH 
005037 1 CLR KTFLG sHOLD OFF KT11 
012700 033371 MOV #TST61D,RO sASCII MESSAGE TO IDENTIFY TEST 
737 017226 JSR PC, TSTSETUP [D0 INITIAL TEST SETUP 
5 1 012737 000002 002164 MOV #2. ,LOOPCNT *PERFORM 2 ITERATIONS 
33 031 T6LOOP: 
0514 BGNSUB SIIIIIIITTETT BEGIN SUBTEST ///////00011 
. 104402 TRAP  CSBSUB 
4d 004737 033416 JSR PC, TEREST sSET PACKET TO INITIAL VALUES 
5298 03 SETPRI #PRIOO “LOWER PRIORITY TO ALLOW INTERRUPTS 
031460 012700 000000 MOV #PRIO0.RO 
031464 104641 TRAP CSSPRI 
5299 031 012703 002732 MOV #TSTBLK+10. R3 sSTART OF TEST DATA 
5 1472 012704 032320 MOV STOPACKET RG “GET THE ADDRESS OF COMMAND PACKET 
$58 167% 012764 000010 000006 a MOV #8. ,PKBCNT(R4) “START WITH MINIMUM ALLOWABLE VALUE 
3 031504 BGNSEG 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
031504 TRAP  CSBSEG 
$305 031506 737 016464 JSR PC, SOF INIT :D0 SOFT INIT OF CONTROLLER 
5306 03151 acs 108 “BR IF SOFT INIT = OK 
5310 O31 14 010001 MOV RO,R1 “SAVE CONTENTS OF TSSR 
$311 031516 ERRDF ERRNO, SFIERR,SFIMSG “DEVICE FATAL ERROR DURING INIT 
031516 TRAP  CSEROF 
4 .WORD 601 
1522 00 “WORD SFIERR 
3 002170 0$ sCLEAR FATAL ERROR F — 
531 10$: CLR FATFLG L 
a8 1 002172 CLR INTRECV CLEAR INTERRUPT RECEIVED FLAG 
$315 Osieas OORTS? O17OSE Re Camissa. Set TGR SSReTO SET 
; 16 1546 oo acs 15$ 7BR IF CARRY SET (GOOD RETURN) 
$317 031550 ROV r0,R1 — — 





— — — — — —— — — 


TEST 6: 


$321 03155 
031582 





354 031700 
5355 031704 





CZTUWAO TUBO FRONT END PRT A 


COMPLETION INTERRUPT 


017720 


002172 


000200 
000100 
000100 


000006 
003030 
031504 


002170 
017772 
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15$: 


223: 


708: 


ERRDF 


ERRNO, T6SSR ,PKTSSR 


PC ,FATCHK 
SEG 


INTRECV 
ERRNO, TONINT ,PKTSSR 


TSSRCRS) RI 
#SSR,R2 


ERRNO, TONBA ,PKTSSR 


(R35) + ,PKBCNT(R4) 
3, #TBLEND 


FATFLG 
PC ,CKDROP 


DEVICE FATAL SSR FAILED TO SET 
TRAP 


eee 


CSERDF 

«WORD 602 
- WORD 
«WORD PKTSSR 

:INC AND CHECK FOR MORE THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG i 











RAP CSCLP1 
BY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
10000$-. 


:DID AN INTERRUPT OCCUR ? 
BRANCH IF YES 





TRAP 





CSERHRD 
605 





sGET THE CONTENTS OF TSSR 
sEXPECTED CONTENTS OF TSSR 
71S —8 BIT SET ? 


BRANCH T OFF-LINE 
SET OFFeLINE IN EXPECTED DATA 
SOKAY if RATCN MATCH RECEIVED ? 














—XEE 9 SEGMENT <<<<<d<d<CCCK< 
" TRAP = CSESEG 

sSET THE TEST WORD 

°HAS ALL DATA BEEN TESTED ? 

*BRANCH IF ALL DATA DONE 

*BRANCH TILL BACK TO ZERO 

s\ANAANAANAANN END SUBTEST \AAAVAAAAANAN 
110056: 


CSESUB 





sANY FATAL ERRORS ? 
BRANCH IF NOT 
sTRY TO DROP THE UNIT 


SEQ 1353. 


CZTUWAO TUSO FRONT END PRT A 
TEST 6: COMPLETION INTERRUPT 





712 «1 
5369 031714 012703 032362 
7 1720 012704 032320 
5371 031724 004737 035416 


$3735 031730 
031730 


016464 


002172 





000002 
177776 
016740 
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+ 


;TEST 6, SUBTEST 2 


;CHECK THAT UNUSED BITS BEING SET CAUSES 


— ot mpgs mn — — — — — — ⸗ — 


sURITE CHARACTERISTICS COMMAND TO BE REJECTED 


BGNSUB 


SETPRI #PRIOO 


MOV ST62DATA,RS 
5$: MOV @T6PACKET ,R4 
JSR PC, TOREST 





PC, SOF INIT 
10$ 





RO,R1 
ERRNO, SFIERR,SF IASG 


INTRECV 


ADD (n3) ,RO 
BIS RSS (RO) 
MOV Re, TSB (RS) 





RO.R1 
ERRNO, T6SSR ,PKTSSR 





158: CKLOOP 
ESCAPE SEG 
INTRECV 
ERRNO, TONINT ,PKTSSR 
22%: BOV TSSRCRS) RI 


GET THE CONTENTS OF TSSR 


SAILITTTITITT BEGIN SUBTEST ///7////17707 


TRAP CS$BSUB 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV PPRI 
TRAP 
s START OF TEST DATA FOR SUBTEST 
T THE ADDRESS OF COMMAND PACKET 
SRESTORE PACKET TO STARTING VALUES 


¢>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP c$es 


3D0 SOFT INIT OF CONTROLLER 

BR IF SOFT INIT = OK 

sSAVE CONTENTS OF TSSR 

DEVICE FATAL ERROR es INIT 











CSERDF 
«WORD 605 
«WORD SFIERR 
-WORD SFIASG 





sCLEAR INTERRUPT RECEIVED FLAG 
sSTART OF THE C PACKET 
OFFSET TO THE DATA WORD TO TEST 
sSET THE DATA BITS TO BE TESTED 
sSET THE PACKET ADDRESS 

WAIT FOR SSR TO SET 

:BR IF CARRY SET (GOOD RETURN) 
sSAVE CONTENTS OF TSSR 

DEVICE FATAL SSR mei gat 





CSERDF 
-WORD 606 
WORD T6SSR 
WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
TRAP CSCLPI 
sBY-PASS CHECKS IF — “yy 
CSESCAPE 
100008-. 


:D1D AN INTERRUPT OCCUR ? 
sBRANCH IF YES 


RAP 
WORD TO6NINT 
- WORD 





CSSPRI_ 


CSERHRD 
607 


PKTSSR 


SEQ 134 


* — — — — 


~<+ ——— — — — — —— 


— —— —— — ———— — — — — — — — — 


s 
: 





5403 
5404 
5405 
5406 
5407 
5408 





? 


se 
eu 
oocooocooooooosoo 


22222 
D 
Se 

= 
SRO 


2222222 
28 


— 
2 
2 


FRONT END PRT A 
10N INTERRUPT 


702 102206 






01 
032701 
00 


000100 
000100 


253: 


000004 
032376 
031720 
59$: 
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@SC!SSRITSREJ!NBA,R2 
#OFL RI 


ERRNO, T6O2REJ .PKTSSR 


ges CONTENTS OF TSSR 
BIT SET ? 


NOT OFF-LINE 
LINE IN EXPECTED DATA 
NPECTED MATCH RECEIVED ? 


Se Ge Ge Ge Ge Ge Ge 
wm 
mm 
ol 






OKAY CH 

;COMMAND NOT REJECTED 
TRAP CSERHRD 
«WORD 608 
WORD T62REJ 
«WORD PKTSSR 





86666 CCC K KCC END SEGMENT <€<<<<CCK KKK 


: 
TRAP © CSESEG 


sPOINT TO NEXT DATA PAIR 
E TO END OF TEST DATA 


BRANCH TILL BACK TO ZERO 

s\ANANNAANANNN END SUBTEST NANAANANANANA 
110057: 

CSESUB 















SEQ 135. 


— — — — — — — — — — 
ET — — — — 


— —— — — —— 


TEST 6: 


CZTUWAO TUBO FRONT END PRT A 
COMPLETION INTERRUPT 








— — ome 
oe 


Eee 


SEFEEE — 
38868855555888 
—— 


e+ c+ e+ 
- om & 
—28 


+N 4N4 





PRE 
Shu 
222222222222 


SANNA NAN AY 


at a+ e¢ ot et et ot ¢¢ ¢?¢ of 


cEPEREES 
ecoooooecoc]sec 
NENT NE NENT 


cect ete 


tt 
** 
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3* 
3 TEST 6, SUBTEST 3 


SUBTEST TO VERIFY THAT A WRITE CHARACTERISTICS COMMAND IS 
:REJECTED IF AN ILLEGAL DATA BLOCK ADDRESS IS ISSUED. 


5$: 


7? 002172 108: 
000001 


0323350 


17777 
004737 016740 
5445 032206 
206 01 


15$: 


002172 


BGNSUB 
SETPRI #PRIOO 


ROV #T62DATA,RS 
MOV @TOPACKET ,R4 
o TEREST 


JSR 

JSR —s PC. SOF INIT 
acs 10$ 

MOV 


RO,R1 
ERRNO, SFIERR, SF IASG 


CLR INTRECV 
BIS #1, T6DATA 
MOV —s_ RG, TSDBCRS) 
SR sé: WATE 
acs 15$ 
RO,R1 

ERRNO, TOSSR,PKTSSR 


ESCAPE SUB 


Ss INTRECV 
ERRHRD ERRNO, TONINT .PKTSSR 


TSSRCRS) RI 
#SC!SSR!TSREJ!NBA, oR2 





BEG 
ERRHRD ERRNO, TO4REJ ,PKTSSR 


SIGINT AAA a SUBTEST ////7/000017 
a $ 


TRAP C$8SUB 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV aPR 





TRAP 
sSTART OF TEST DATA FOR SUB 
GET THE ADDRESS OF COMMAND PACKET 
i RESTORE PACKET TO STARTING VALUES 
3D0 SOFT INIT OF CONTROLLER 
sBR IF SOFT INIT = OK 
SAVE CONTENTS OF TSSR 
SDEVICE FATAL ERROR es ” tad 






























CSERDF 
609 
SFIERR 
- WORD F IASG 
CLEAR INTERRUPT RECEIVED FLAG 
3MAKE AD 
:SET THE PACKET ADDRESS 
sWalT FOR SSR TO SET 
sBR ARR 
;SAVE CONTENTS OF TSSR 
DEVICE FATAL SSR FAILED TO SET 
TRAP CSERDF 
«WORD 610 
-WORD T6SSR 
-WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
T CSCLP1 
BY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
-WORD 110060-. 
DID AN INTERRUPT OCCUR ? 
sBRANCH IF YES 
TRAP CSERHRD 
WORD 611 
WORD T6NINT 
WORD PKTSSR 


T OFF°LINE 
SET OFF-LINE IN EXPECTED DATA 
sDOES 9 EXPECTED MATCH RECEIVED ? 









Y If MATCH 
:COMMAND NOT REJECTED 






TRAP 
WORD 


CSERHRD 
612 


a =| 


— — ee — 


#11 
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TEST 6: COMPLETION INTERRUPT 


SEQ 157. 





















032 011520 «WORD PKTSSR 
5470 0 30S: 
5471 0 ENDSUB S\ANANANAAAAANN END SUBTEST N\ANNANAAANANN 

032302 110060: 

0 104403 TRAP CSESUB 
5472 0 EXIT TST sALL DONE THIS TEST 

0 104432 TRAP CSEXIT 
5473 032306 001162 . -WORD 110055-. 
sere sLOCAL STORAGE FOR THIS TEST 
5477 032310 -BLKB 10-<.-TUV2A87> 
5479 0 T6PACKET: sCOMMAND PACKET FOR TEST 
5480 0 yf eWORD 100204 sWRITE CHAR COMMAND, WITH IE, ACK 
5481 0 2 032330 -WORD T6DATA sADDRESS OF CHARACTERISTICS BLOCK 
* 9 000000 -WORD 0 

0 000010 -WORD 8. sSTARTING VALUE OF BLOCK SIZE 
5484 0323 T6DATA: s CHARACTERISTICS DATA BLOCK 
5485 0 333 032342 -WORD T6BFR sADDRESS OF MESSAGE BUFFER 
5484 0 ; 000000 -WORD 0 
5487 0 8 000016 WORD 14. sLENGTH OF MESSAGE BUFFER 
$488 9323 000000 -WORD 0,0 
38 032342 T6BFR: BLky 8. sMESSAGE BUFFER 

sTEST DATA FOR SUBTEST TWO 

54 sDATA HAS FORMAT: 


1ST WORD OFFSET TO TEST WORD IN PACKET 
WORD BITS TO SET FOR TEST 





" WORD 0,B81TS!116!6116!81T10!81111!81712!B1T13 


. 2.8110 
WORD 4,B1T6!B1T15 
T62D0NE=. 


3¢ 
SLOCAL TEXT MESSAGES FOR TEST 





127 122 171 eASCIZ “WRITE CHARACTERISTICS Command Not ego 

127 122 111 > .ASCIZ “WRITE CHARACTERISTICS Not Rejected With Non-Zero Unused Fields’ 
127 122 111 J: eASCIZ ‘WRITE CHARACTERISTICS Not Rejected With Invalid Data Count’ 
127 122 111 T64REJ: .ASCIZ ‘WRITE CHARACTERISTICS Not Rejected With Invalid Block Address’ 
127 122 111 =T6SREJ: . "URITE CHARACTERISTICS Not Rejected With Invalid Buffer Length’ 
103 157 156 16S .ASCIZ “Contents of TSSR Incorrect After WRITE CHARACTERISTICS’ 

105 170 160 : -ASCIZ ‘Expected Interrupt Not Received On WRITE CHARACTERISTICS* 

125 156 145 : .ASCIZ ‘Unexpected Interrupt Received On WRITE CHARACTERISTICS’ 

111 156 143 T6TSBA: . "Incorrect TSBA Address After WRITE CHARACTERISTICS’ 

103 157 155 TST6I0: — "Completion Interrupt’ 





—— nd 
— — — — 


crane 9 FRONT END PRT A 


TEST 





COMPLETION INTERRUPT 


032320 
100204 
032330 


000010 
032342 


000016 


032342 


— — — —— — — — — — — 


111 
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ROUTINE TO RESTORE COMMAND PACKET TO START-UP (DEFAULT) VALUES 


T6REST: 


sSAVE THE REGISTERS 
STOPACKET RI sSTART OF THE PACKET 


CKE 
#100204, (R1)+ sWRITE CHARACTERISTICS WITH ACK, IE 
SS OF CHAR DATA BLOCK 





(R1) EX XTENDED ADDRESS 
#8. ,(R1)+ sSIZE OF DATA BLOCK IN BYTES 
—e* sADDRESS OF MESSAGE BUFFER 
Sauer sLENGTH OF MESSAGE BUFFER 

& 

(R1) 
T6BFR sCLEAR 1ST LOC IN MESSAGE BUFFER 
PC sRETURN 





110055: 
TRAP CSETST 


SEQ 138 


— — — 


— —— — — — 





J 11 
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TEST 7: BASIC PACKET PROTOCOL . _— 


SEQ 159 





























5538 .SBTTL TEST 7: BASIC PACKET PROTOCOL 
5540 : THIS TEST VERIFIES BASIC OPERATION OF THE MESSAGE BUFFER RELEASE 
$541 : t , TH ON OF THE ACK BIT IN THE COMMAND HEADER WORD, 
LE a : AND THE REGISTER MODIFICATION REFUSED (RMR) LOGIC. 
5544 3 
5545 3+ 
3346 ;TEST 7, SUBTEST 1 
5548 CHECKS THAT THE RESSAGE BUFFER RELEASE COMMAND WORKS 
5549 “PROPERLY AND THAT NO INTERRUPT IS GENERATED EVEN 
3550 3 IF THE ne BIT IS SET IN THE COMMAND PACKET 
3385 033672 i BGNTST 
$554 333 005037 002170 CLR FATFLG sCLEAR FATAL enaun FLAG 
Tat 
5555 033476 012737 005672 002146 MOV #EPRT1 EPRTSW “SET UP ERROR MESSAGE MSwiten 
5556 033 005037 003100 CLR KTFLG sHOLD OFF KT11 
MOV STSTTID.RO sASCII MESSAGE TO IDENTIFY TEST 
JSR PC, TSTSETUP *D0 INITIAL TEST SETUP 
002164 MOV #2. .LOOPC sPERFORM 2 ITERATIONS 
T7LOOP: 
BGNSUB SJILITUUITTET BEGIN SUBTEST //////000001 
Sc CSBSUB 
JSR PC. T7RST sSET PACKET TO INITIAL VALUES 
SETPRI #PRIOO “LOWER PRIORITY TO ALLOW INTERRUPTS 
MOV #PRI00.RO 
TRAP  CSSPRI 
MOV ST7PACKET .R4 sGET THE ADDRESS OF COMMAND PACKET 
10 000006 " MOV #8. ,PKBCNT(R4) “START WITH MINIMUM ALLOWABLE VALUE 
’ BGNSEG 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
a 033554 TRAP  CSBSEG 
004737 016464 PC, SOF INIT :DO SOFT INIT OF CONTROLLER 
5576 108 “BR IF SOFT INIT = OK 
5580 033564 01 RO,R1 *SAVE CONTENTS OF TSSR 
ERRNO, SFIERR, SFIMSG “DEVICE FATAL ERROR DURING INIT 
033566 TRAP  CSERDF 
0 .wORD 701 
% “WORD  SFIERR 
574 “WORD  SFIMSG 
576 002170 10$: CLR FATFLG SCLEAR FATAL ERROR FLAG 
5583 0 002172 INTRECV CLEAR AR INTERRUPT RECEIVED FLAG 
5584 0 177776 R4, TSOB(RS) iE THE PACKET ADDRESS 
$585 03361 017054 PCCHKTSSR WAIT FOR SSR TO SET 
5586 033616 15$ “BR IF CARRY SET (Go0p RETURN) 
5587 0 R0,R1 sSAVE CONT EN NTS OF TSSR 
5591 03 ERRNO, T7SSR,PKTSSR “DEVICE FATAL SSR FAILED TO SET 
0 2 TRAP CSERDF 
0 : 702 
0 0 — 








— — — — — — 


— — — — — 


ZTUWAO TUSO FRONT END PRT A 


C 
TEST 7: 


033630 011520 
5592 033632 004737 


5593 R8 
559% 033640 
3640 


033720 
5614 033722 
033722 





5615 
5616 035724 
561 





7 033730 01275 
3736 012714 
046 





104406 


036260 
716 011520 


104405 
104404 
005037 


BASIC PACKET PROTOCOL 


017720 
15$: 
002172 
000000 228: 
000200 
000100 
000100 
258: 
30$: 
002172 
— 035652 
100212 
177776 
017054 
017720 
45$: 
528: 





JSR 
CKLOOP 
ESCAPE 


TST 
BNE 
ERRHRD 


JSR 
BCS 


MOV 
ERRDF 


CKL 
TST 


JSR 
ooP 


K 11 
MACRO M1200 29-MAR-83 15:24 PAGE 84-1 


PC .FATCHK 
SEG 


INTRECV 
ERRNO, T7NINT ,PKTSSR 


TSSRCRS) RI 
#SSR,R2 
#OFL RI 

5$ 
#OFL R2 
R2,R1 


ERRNO, T7SSR,PKTSSR 


INTRECV 
#025252, 17BFR 
#100212, (R4) 
Re, TS 
PC-CHKTSSR 
45$ 


RO.R1 
ERRNO, T7SSR.PKTSSR 


PC .FATCHK 


INTRECV 


BE 
ERRHRD ERRNO, T7INT,PKTSSR 






TSSRCRS) RI 
#SSR,R 








«WORD PKTSSR 
+ INC AND CHECK FOR MORE THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG SET cacu⸗ 


TRAP 
sBY-PASS SUBTEST IF FATAL ERROR 








TRAP owe 
10000$-. 
DID AN INTERRUPT OCCUR ? 
sBRANCH IF YES 
TRAP CSERHRD 
WORD 705 
WORD T7NINT 
-WORD PKTSSR 





BRANCH IF NOT OFF-LINE 
T OFFLINE IN EXPECTED DATA 
: gehe MATCH RECEIVED ? 






TRAP 
- WORD 
- WORD 


CSERHRD 
7 





T7SSR 
PKTSSR 


8 €<46666444CC< END SEGMENT <<<<6CKKKKKKC 
10000$ : 











TRAP CSESEG 
3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 





3 CLEAR INTERRUPT RECEIVED FLAG 
70 WIPE OUT MESSAGE BUFFER AREA 

sSET COMMAND PACKET TO MESS BUF REL 
set THE PACKET ADDRESS 


WAIT FOR SSR TO SET 
F CARRY SET (GOOD RETURN) 
CONTENT 


3 SAVE S OF TSSR 
sDEVICE FATAL SSR — — 














CSERDF 
WORD 705 
WORD T7SSR 
- WORD 


PKTSSR 
s INC AND CHECK FOR MORE THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG a 











CSCLP1 
:D1D AN INTERRUPT OCCUR ? 
sBRANCH IF NO 
TRAP CSERHRD 
eWORD 706 
eWORD T7INT 
PKTSSR 


:GET THE CONTENTS OF TSSR 


_-——— 





SEQ 140 | 


7 — — — 
— — — 


<A — — — — — — 


TEST 7: 


—=——— EE ooo [ <=_— 


CZTUWAO TUBO FRONT END PRT A 


5637 034022 
5638 

5639 0340 
5640 


011520 


013701 
012702 
020102 


001404 


34064 104456 
001304 


035734 
016164 
005737 


BASIC PACKET PROTOCOL 


000100 
000100 


035652 
025252 


002170 
017772 
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55$: 


708: 


#OFL,R1 
#OFL ,R2 
R?.Ri 


608 
ERRNO, T7SSR,PKTSSR 


w02se62,n2 


Foe 
ERRNO, T7MBF ,EXPREC 


FATFLG 
PC ,CKDROP 


— — — — — — — — 


—4 Ala oS SET ? 


H IF NO “LINE 
SET OFF-LINE IN EXECTED DATA 
+ DOES Big tt MATCH RECEIVED ? 


F RA 
Pass INCORRECT AFTER WRT CHARA."’ 
TRAP 86C¢ 











sPICK UP THE 1S 

:SET UP EXPECTED DATA 

sWAS ANY MESSAGE REC'D 

sBR, IF OK (EQUAL) 

sMESSAGE BUFFER WAS a 





CSERHRD 
708 














-WORD T7MBF 
-WORD EXPREC 

sANY FATAL ERRORS 

sBR, IF NO FATAL ERRORS 

sTRY TO DROP THE UNIT 

8 2KE EKER KKK 9 — £0 KECK KKK 
TRAP CSESEG 





SIIIIII EMD SUBTEST ////40000011 
110062: 
TRAP CSESUB 





SEQ 141 


ee EE — — — 


CZTUWAO TUBO FRONT E 


TEST 7: 





ND PRT A 
BASIC PACKET PROTOCOL 


016464 


002170 
002172 


A 11 
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20 035646 


177776 
017054 


017720 


002172 


3+ 
— 7, SUBTEST 2 


S PROPER LY 
BIT IS SET 


AND THAT IMERE IS AN 





— — — — — — 





IN COMMAND PACKET AND 
18 SET IN THE CHARACTERISTICS DATA PACKET 


S$: 


10$: 


15$: 


JSR PC, T7RST 
SETPRI #PR100 


MOV STTPACKET RS 
MOV #8. ,PKBCNT(R4) 
BGNSEG 


JSR PC SOF INIT 
10$ 





BCS 

MOV RO,RI1 

ERRDF ERRNO, SFIERR,SFIMSG 
CLR FATFLG 

CLR 

MOV 

MOV 

JSR 

BCS 

MOV RO.RI 

ERRDF ERRNO, T7SSR,PKTSSR 


JSR PC ,FATCHK 
CKLOOP 
ESCAPE SEG 


pe INTRECV 
ERRHRD ERRNO, T7NINT,PKTSSR 


SHIIIIIIINATT BEGIN SUBTEST S///IIIIIIII 
ae csesus 


‘SET PACKET TO INITIAL VALUES 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV #PRI 
TRAP CSSPRI- 
sGET THE ADDRESS OF COMMAND PACKET 
sSTART WITH MINIMUM ALLOWABLE VALUE 


$>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 











300 SOFT INIT OF CONTROLLER 
BR IF SOFT INIT = OK 
:SAVE CONTENTS OF TSSR 
sDEVICE FATAL ERROR oe INIT 












CSERDF 
GORD 709 
-WORD SFIERR 
WORD SFIMSG 


sCLEAR FATAL ERROR FLAG 

CLEAR INTERRUPT RECEIVED FLAG 
7SET ERI IN CHARACTERISTICS DATA 
; T ADDRESS 









TS OF TSSR 
SDEVICE FATAL SSR FAILED TO SET 
TRAP CSERDF 
WORD 710 
-WORD T7SSR 
PKTSSR 


- WORD 
:INC AND CHECK FOR MORE THAN 25 ERRORS 
LOOP ON ERROR, IF FLAG SET cert 


TRAP 
sBY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
10000$-. 


sDID AN 1* OCCUR ? 


; BRANCH 
TRAP CSERHRD 
eWORD 711 
~WORD T7NINT 
WORD PKTSSR 


016501 000000 228: MOV TSSRCRS) RI :GET THE CONTENTS OF ISSR... 


SEQ 142 


' 
‘ 
— — — — — — — — — ——— — — — — — — — — 


— - — —— — 
— — — — — 


TEST 7: 


5710 034260 
5711 034264 
5712 034270 
5713 034272 


5714 034276 0 
71 300 


5715 034 

5719 034302 
034302 
034304 


CZTUWAO TU8O FRONT END 
BASIC PACKET PROTOCOL 


012702 


034306 036260 


034310 
5720 034312 
5721 034312 
034312 
034312 
5722 034314 
034314 


5723 
AL 034316 


104406 
5737 034366 
001004 


5738 034372 
5742 034374 
034374 
868 
034400 


5743 034404 


5744 034410 O12 


naa 38 





PRT A 


000200 


000100 


000100 


7 017054 


7 017720 


002172 


000000 
000200 
000100 
000100 


035652 
025252 


N11 
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25$: 


30S: 


2 
035652 


45$: 


528: 


55$: 


60S: 


ENDSEG 


BGNSEG 


#SSR,R2 
#OFL RI 


#OFL RZ 
R2,K1 


30 
ERRNO, T7SSR,PKTSSR 


INTRECV 
#025252,17BFR 
#100212, (R4) 
R4, TSDB(RS) 
PC. CHKTSSR 
45$ 


RO.R1 
ERRNO, T7SSR,PKTSSR 


PC .FATCHK 


INTRECV 
ERRNO, T7INT PKTSSR 


TSSRCRS) ,R1 
#SSR,R2 


#OFL.RI 
+ a 


$ 
ERRNO, T7SSR,PKTSSR 


T7BFR,R 
soesebe, R2 


—* 


— — — — — — 


701 — as OF TSSR 
31S OFF-LINE BIT SET ? 


sBRANCH IF NOT OFF-LI 

3SET OFFeLINE IN EXPECT ED DATA 
—* EXPECTED MATCH RECEIVED ? 
sOKAY IF MATCH 

NBA NOT Z 








TRAP 
WORD 
«WORD T7SSR 
«WORD PKTSSR 


5 €6666 CCK END SEGMENT <€4<<<CC KKK 
10900$: 
TRAP CSESEG 
3$>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 


sCLEAR INTERRUPT yg hg FLAG 
sWIPE OUT MESSAGE R AREA 
;SET COMMAND PACKET 10 MESS BUF REL 


ARRY 
SAVE CONTENTS OF 
;DEVICE FATAL SSR FAILED TO SET 
TRAP CSERDF 
WORD 715 
-WORD T7SSR 
-WORD PKTSSR 
sINC AND CHECK FOR MORE THAN 25 ERRORS 
;LOOP ON ERROR, IF FLAG a 


CSCLP1 
DID AN INTERRUPT OCCUR ? 
sBRANCH IF YES 
TRAP CSERHRD 
WORD 714 
eWORD T7INT 
WORD PKTSSR 


GET THE CONTENTS OF TSSR 
EXPECTED CONTENTS OF » Foor 
31S con VE ae BIT SET ? 


CH IF NOT OFF-LINE 
SET OFF-LINE IN N EXPECTED DATA 
;DOES ghey MATCH RECEIVED ? 


“NBA NOT SET 


TRAP CSERHRD 
eWORD 715 
-WORD T7SSR 
eWORD PKTSSR 


sPICK UP THE 1ST reer OF MESSAGE BUFFER 
;SET UP EXPECTED DAT 
sMAS ANY Lag REC *D 


— —— 


SEO 143 | 


——- 


— — — — 


CZTUWAO TUSO FRONT END PRT A 


TEST 7: BASIC PACKET PROTOCOL 


5762 034456 





5 

5767 034474 

5768 *88 

5769 034500 
034500 


034500 
5770 034502 
034502 
034502 


104456 
001314 
035734 
016164 


005737 
001402 
004737 017772 


104405 


104403 
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ERRHRD ERRNO, T7MBF ,EXPREC 


TST FATFLG 
JSR PC ,CKOROP 


oor °F 


sMESSAGE BUFFER WAS MODIFIED 
TRAP 





CSERHRD 
716 

7BF 
XPRE 





WORD T 
-WORD €E 


C 


sANY FATAL ERRORS 
sBR, IF NO FATAL ERRORS 
sTRY TO DROP THE UNIT 


$<KKKKKKKC KKK END SEGMENT <<<<€C CCK CCK 
10001$: 


TRAP CSESEG 

3— END SUBTEST (7744774747077 
L10063: 

TRAP CSESUB 


eS A —— — — 


CZTUWAO TUSO FRONT END PRT A 
BASIC PACKET PROTOCOL 


TEST 7: 


000006 








C 12 
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¢ 
s TEST 7, SUBTEST 3 


: CHECKS THAT THE “PU GIVES UP OWNERSHIP OF THE MESSAGE BUFFER 
AFTER THE MESSAGE BUFFER RELEASE, AND THAT FOLLOWING COMMANDS 


;WORK CORRECTLY 


5$: 


10$: 


158: 


228: 





PC, T7RST 
#PRI00 


#T7PACKET .R4 
#8. ,PKBCNT(R4) 


PC, SOF INIT 
10$ 





ROR 
ERRNO, SFIERR, SF IASG 


FATFLG 
INTRECV 

R4, TSOB(RS) 
PC CHKTSSR 
15$ 


RO,R1 
ERRNO, T7SSR, PXISSR 


PC. FATCM 
SEG 


INTRECV 
ERRNO, T7NINT ,PKTSSR 


TSSRCRS) RI 


#OFL — — 





— — — — —— — —— — — 


VVVVVVAAA «BEGIN SUEOTESVVVVVVVVEä 
"TRAP ss C$BSUB 


;SET PACKET TO INITIAL VALUES 
sLOWER PRIORITY TO ae 


I 
TRAP CSSPRI 
:GET THE ADDRESS OF COMMAND PACKET 
sSTART WITH MINIMUM ALLOWABLE VALUE 


2>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 






3:00 SOFT INIT OF CONTROLLER 
sBR IF SOFT INIT = OK 

sSAVE CONTENTS OF TSSR 

DEVICE FATAL ERROR — INIT 














CSERDF 

«WORD 717 
-WORD  SFIERR 
-WORD SFIMSG 

CLEAR FATAL ERROR FLAG 

SCLEAR INTERRUPT RECEIVED FLAG 

3SET THE PACKET ADDRESS 

sWAIT FOR SSR TO SET 

sBR IF CARRY SET (GOOD RETURN) 

sSAVE CONTENTS OF TSSR 

;DEVICE FATAL SSR FAILED TO SET 
TRAP CSERDF 
WORD 718 
eWORD T7SSR 


-WORD  PKTSSR 
:INC AND CHECK FOR MORE THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG 





TRAP CSCLP1 
:BY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
WORD 10000S-. 
:D1D AN INTERRUPT OCCUR ? 
sBRANCH IF YES 
TRAP CSERHRD 
sWORD 719 
WORD T7NINT 





;GET THE CONTENTS OF TSSR 
SEXPECTED CONTENTS OF _ FSSr 





SEQ 145 


————— — —— — — — — — 


— — — 


CZTUWAO TUBO FRONT END PRT A 
TEST 7: BASIC PACKET PROTOCOL 


5818 034654 








702 000100 


017720 


? 002172 


000000 
000200 
000100 


702 000100 


035652 
025252 
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035652 
2 


2538: 


308: 


458: 


328: 


558: 





ato 258 
BIS #OFL,R2 
CMP R2,R1 


BEQ “ 
ERRHRD ERRNO, T7SSR,PKTSSR 


JSR PC. T7RST 
INTRECV 
#025252, 17BFR 
#100212, (R4) 


MOV 
MOV R4, TSDBCRS) 
JSR — 


ROR 
ERRDF ERRNO, T7SSRM,PKISSR 


PC .FATCHK 


3 INTRECV 
ERRHRD ERRNO, T7INT PKTSSR 







MOV TSSRCRS) RI 
MOV #SSR RZ 
BIT 

BEG 

BIS 

CAP 

BEQ 


ERRHRD ERRNO, T7SSR,PKTSSR 


T7BFR,R 
woesgb2,02 


7 
ERRNO, T7MBF .EXPREC 


BRANCH IF NOT OFF-LINE 

SET OFFLINE IN N EXPECT ED DATA 
DOES EXPECTED MATCH RECEIVED ? 
sOKAY IF MATCH 

NBA NOT Z 





TRAP CSERHRD 
720 


- WORD 
WORD T7SSR 
. PKTSSR 


5 <<66666CCCCCK END SEGMENT <<<<CCK KKK KKK 
10000$: 














TRAP CSESEG 
$>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 
aoe PACKETS AND COMMANDS 
sCLEAR INTERRUPT RECEIVED FLAG 
sWIPE OUT MESSAGE BUFFER AREA 
T COMMAND PACKET 10 MESS BUF REL 
ADDRESS 














‘SAVE CONTENTS OF TSSR 
DEVICE FATAL SSR oe 


CSERDF 
721 





° T7SSRA 


-WORD PKTSSR 
sINC AND CHECK FOR MORE THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG SET 
TRAP CSCLP1 
DID AN INTERRUPT OCCUR ? 
BRANCH IF NO 








sGET THE CONTENTS OF TSSR 
sEXPECTED CONTENTS OF TSSR 
318 ae tr aan at SET ? 


BRANCH T OFF-LINE 

7SET OFF-LINE IN N EXPEC TED DATA 
DOES EXPECTED MATCH RECEIVED ? 
sOKAY IF MATCH 








NBA NOT SET 


TRAP CSERHRD 
723 





T7SSR 
WORD PKTSSR 


ST —8 OF MESSAGE BUFFER 








SEQ 146 


. — — — 


———— — — — — 


— ————————— — — —— — — — —— 





CZTUWAO TU8O FRONT END PRT A 


TEST 7: 


5909 
5910 03 


on Se 


001324 
035734 
016164 





BASIC PACKET PROTOCOL 


002172 


7 036556 


100000 
177776 
017054 


017720 


002172 


000200 
000100 
000100 


002170 
017772 


002172 
NTASSA 
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70$: 


75$: 


95$: 








INTRECV 
PC, T7RST 


#1 o (R4) 
R4, TSDB(RS) 
PC ,CHKTSSR 
75$ 


RO,R1 
ERRNO, T7SSR,PKTSSR 


PC ,FATCHK 
SEG 
INTRECV 


TSSRCRS) ,RO 
ERRNO, T7NINT .PKTSSR 






TSSRC(RS) RI 
#SSR ,R2 





ERRNO, T7TSSR, PXISSAR 


FATFLG 
PC ,CKDROP 


INTRECV 
PC .T7RST 





——— — —— — ee —— —— 






«WORD 
sLOOP ON ERROR IF FLAG SET 
TRAP 


724 
T7BF 
EXPREC 









CSCLPI 


ET — PACKETS AND COMMANDS 


SSR 10 SE 
sBR IF CARRY SET (GOOD RETURN) 
VE CONTENTS OF TSSR 
VICE FATAL SSR a 





@e te © 
see 





CSERDF 
725 





“WORD  T7SSR 
TSSR 


WORD PK 
sINC AND CHECK FOR MORE THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG ——— 


TRAP 
BY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
10001 














:D1D AN INTERRUPT OCCUR } 
sBKANCH IF YES 
GET TSSR FOR ERROR REPORT 





TRAP 


- WORD 

-WORD 

- WORD 
GET THE CONTENTS OF TSSR 








PKTSSR 





BRANCH OF F-LINE 

eT OFF-LINE IN EXPECTED DATA 
DOES EXPECTED MATCH RECEIVED ? 
OKAY IF MATCH 











“NBA NOT ZERO 
T7SSR 
PKTSSR 
44444 40d 4d 44 cy + vel ¶ dd C 
rnap = CSESEG 





sANY FATAL ERRORS 
7BR, IF NO FATAL ERRORS 
sTRY TO DROP THE UNIT 





8 €<€<€€6CCCC< BEN SEGMENT <<<<KKKCKKKKK 
AP CSBSEG 
sCLEAR INTERRUPT RECEIVED FLAG 


SEQ 147. 


— — — — 
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CZTUWAO TUSO FRONT END PRT A 




























































TEST 7: BASIC PACKET PROTOCOL 
5913 035240 010465 177776 MOV R4, TSOBC(RS) 3sSET 31 PACKET ADDRESS 
5914 035244 004737 017054 JSR PC, CHKTSSR sWAIT F aay 
5915 035250 103407 BCs 1008 <BR IF CARRY SET (GOOD RETURN) 
5916 035252 010001 MOV RO .R1 sSAVE CONTENTS OF 
§920 035254 ERRDF ERRNO, T7SSR,PKTSSR DEVICE FATAL SSR FAILED TO SET 
035254 104455 TRAP CSEROF 
035256 001330 d 728 
035 036260 WORD Lt. 
035 011520 eWORD PKTSSR 
5921 035 737 017720 JSR PC FATCHK + INC AND CHECK FOR MORE THAN 25 ERRORS 
$922 8338 100$: CKLOOP sLOOP ON ERROR, IF FLAG SET 
TRAP CSCLP1 
$923 035272 ESCAPE SEG sBY-PASS SUBTEST IF ia — 
mer 
5924 035276 002172 TST INTRECV :DID AN = OCCUR ? 
5925 035302 BNE 1 :BRANCH 
5929 035304 000000 TSSRCRS) RO GET TSSR FOR ERROR REPORT 
5930 035310 ERRHRD ERRNO, T7NINT, PKTSSR 
035310 TRAP 
035312 WORD 
035314 —_— 
035316 PKTSSR 
5931 035320 1128: TSSRCRS) RI 
at 035324 000200 #SSR,R2 
5933 035330 000100 LR 
5934 035334 5$ sBKANCH NOT OFF-LINE 
5935 035336 000100 #OFL .R2 3 SET OFF-LINE IN EXPECTED DATA 
5936 035342 125$: R2,R1 SDOES EXPECTED MATCH RECEIVED ? 
5937 035344 1 OKAY IF MATCH 
1 035346 ERRNO, T7SSR,PKTSSR NBA NOT ZERO 
035 04456 TRAP CSERHRD 
035350 001332 -WORD 730 
035352 036260 -WORD T7SSR 
035354 011520 WORD PKTSSR 
5942 8338 ENDSEG 8 hhh EK KKK KKK = SEGMENT xx..C«Cæœæ«c«x«« 
O33 56 TRAP CSESEG 
5943 055 005737 002170 130$: TST FATFLG sCMECK FATAL FLAG FOR SET 
§944 035 BEQ 1408 sBR, IF NOT SET (OK) 
5945 035366 004737 017772 JSR PC .CKOROP ‘DROP DEVICE IF INDICATED 
$946 035372 1408: 
5947 035372 ENDSUB SIV ERD SUBTEST (7747000147 
035372 110064: 
035372 104403 TRAP CSESUB 
5948 035374 308: 


— — — — — — — 


CZTUWAO TUSO FRONT END PRT A 


TEST 7: 


5958 
5959 035374 
035374 


5961 035376 
5962 035402 


3 
035574 





104402 
004737 
004737 


5406 012700 
104441 





5995 
5999 035550 


012704 
012703 
012764 
012765 





BASIC PACKET PROTOCOL 


017720 


002172 
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34 
s TEST 7, SUBTEST 4 
CHECKS THAT THE SEGISTER MODIFICATION REFUSED (RMR) BIT IN 


THE TSSR WILL BE StT IF A WRITE CHARACTERISTICS C 


— — — ——— — — — —— — 





de ĩẽ EXECUTED AND ANOTHER “WC’’ COMMAND IS ATTEMPTED 


15$: 








PC, T7RT2 
* irs 
#PRIOO 


#T7PACKET .R4 


#T7PKT.R 
‘8. »PKBCNT (RG) 
#8. ,PKBCNT(R3) 


PC SOF INIT 
10$ 


ROR 
ERRNO, SFIERR,SFIMSG 


FATFLG 

INTRECV 

R4, TSDB(RS) 

Soh a 
PC ,WAITF 

TSSRCRS) RI 
SRR 






1 
ERRNO, T7SSR,PKTSSR 


PC .FATCHK 
SEG 


INTRECY 
22% 


EL ap eaeees LLL 
t 2 
cosus 


sSET SECOND PACKET UP 
3SET PACKET TO INITIAL VALUES 
sLOWER PRIORITY TO ALLOW ® ae * 


#PRI 
TRAP CSSPRI_ 
sGET THE ADDRESS OF COMMAND PACKET 
T THE ADDRESS OF 2ND CMD PACKET 
SSTART WITH MINIMUM ALLOWABLE VALUE 
sSTART WITH MINIMUM ALLOWABLE VALUE 


2>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 


300 SOFT INIT OF CONTROLLER 
:Bk IF SOFT INIT = OK 
sSAVE CONTENTS OF “TSSR 
[DEVICE FATAL ERROR DURING INIT 














TRAP CSERDF 

"GORD 731 
WORD SFIERR 
WORD SFIASG 

sCLEAR FATAL ERROR FLAG 

CLEAR INTERRUPT RECEIVED FLAG 

SET THE PACKET ADDRESS 

' COND COMMAND PACKET 

WAIT FOR SSR TO SET 

GET CONTENTS OF TSSR REGISTER 

sCHECK FOR SSR (TSSR) SET 

BR. IF SSR SET (GOOD) 

SDEVICE FATAL SSR FAILED TO SET 
TRAP  CSERDF 
WORD 732 
WORD T/7SSR 





sINC AND CHECK FOR MORE THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG =. 





CSCLP1 
sBY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
10000$-. 





DID AN INTERRUPT OCCUR ? 
“BRANCH IF YES 


' 
’ 
— — — — 





WH 12 














Q 150° 
CZTUWAO TUBO FRONT END PRT A MACRO M1200 29-MAR-835 15:24 PAGE 87-1 - 
TEST 7: BASIC PACKET PROTOCOL | 
035550 104456 TRAP CSERHRD 
035552 001355 - WORD O35 
035554 036347 «WORD T7NINT 
035556 011520 «WORD PKTSSR 
6000 035560 016501 000000 228: TSSHCRS) ,RI ;GET THE CONTENTS OF TSSR 
6001 035564 012702 110200 MOV #SSR!RAR'SC,R2 C TSSR 
6002 035570 032701 000100 #OFL RI 
































T OFF-LINE 
sare tease °° ase — ARS ho 
6006 035604 001404 MATCH 
6010 035606 ERRNO, T7SSR,PKTSSR 
035606 104456 TRAP CSERWRD 
0356106 001336 -WORD 734 
035612 036260 -WORD T7SSR 
035614 011520 -WORD PKTSSR 
6011 035616 30S: 
6012 035616 ENDSEG 3 €€<66666C<CKC END SEGMENT <<<<d<<KKKKKC 
035616 10000$: 
035616 104405 TRAP CSESEG 
6013 035620 ENDSUB 3 ERD SUBTEST VV— 
035620 110065: 
035620 104403 T CSESUB 
6014 035622 EXIT TST sALL DONE WITH THIS TEST 
035622 104432 TRAP CSEXIT 
035624 001056 


WORD 110061-. 


— — — — 


CZTUWAO TUBO FRONT END PRT A 
TEST 7: BASIC PACKET PROTOCOL 


6053 035714 
6054 





6046 

6047 035702 
6048 035702 
6049 035704 
6050 035706 
6051 035710 


100204 
035640 
000000 


000010 


035652 
000016 
000000 


z5555 22- 
a ned 
33888 Cou 





wet meh coed ed ot 323322 
23388 BRE 


TST71D: 
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34 
sLOCAL STORAGE FOR THIS TEST 


d 10-<.-TUV2A87> 
T7PACKET: 


00204 
T7DATA 


T7DATA: 


T7BFR: .BLkW 8&8. 
4 


[TEST DATA FOR SUBTEST FOUR 
T7PKT: 


100204 
T7DTA 
0 

8. 


T7DTA: 





T7BUFR: .BLKW 8. 


3* 
SLOCAL TEXT MESSAGES FOR TEST 


RRR 


Be 

or 
SEP ee wae hee Be es re mt Og 
Ce Le he a he Le] 


ahhh 


— — — — — — — — — 


sCOMMAND PACKET FOR TEST 

“WRITE CHAR COMMAND, WITH IE, ACK 
SADDRESS OF CHARACTERISTICS BLOCK 
sSTARTING VALUE OF BLOCK SIZE 


; CHARACTERISTICS DATA BLOCK 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


COMMAND PACKET FOR I 
sWRITE CHAR COMMAND, WITH IE, ACK 
ADDRESS OF CHARACTERISTICS BLOCK 
sSTARTING VALUE OF BLOCK SIZE 


s CHARACTERISTICS DATA BLOCK 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 









sMESSAGE BUFFER 


"Message Buffer Modified after MESSAGE BUFFER RELEASE Command’ 
"MBA Not Clear After WRITE CHARACTERISTICS Command’ 
"NBA Set After MESSAGE BUFFER RELEASE Command’ 


"Contents Of TSSR Incorrect After Message Buffer Release’ 
‘Contents of TSSR Incorrect After WRITE CHARACTERISTICS’ 
Expected Interrupt Not Received On WRITE 
"Unexpected Interrupt Received On WRITE 
"Basic Packet Protocol’ 








CHARACTERISTICS" 





CHARACTERISTICS’ 


SEQ 151 


ae — -< - — 
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CZTUWAO TUBO FRONT END PRT A 
TEST 7: BASIC PACKET PROTOCOL 


































T7RST 
SAVREG sSAVE THE REGISTERS 
012701 035630 @T7PACKET,R1 :$ TART OF THE PACKET 
012721 100204 MOV #100204 ,(R1)+ WRITE gg hog tty WITH ACK, IE 
012721 035640 MOV aTIDATA, (R1)¢ sADDRESS OF CHAR DATA BLOCK 
2 CLR (R1 sEXTENDED ADDRESS 
012721 10 MOV a. cat *— ziit OF DATA BLOCK IN BYTES 
012721 035652 M6v #T7BFR,(R1)¢ SADDRESS OF MESSAGE BUFFER 
005021 CLR (R1)¢ 
012721 000016 MOV #14.,(R1)¢ sLENGTH OF MESSAGE BUFFER 
005021 CLR (R1D¢ 
005011 CLR (R11) 
005037 035652 CLR T7BFR sCLEAR 1ST LOC IN MESSAGE BUFFER 
000207 RTS PC sRETURN 
ad 
$ ROUT INE TO RESTORE COMMAND PACKET #2 TO START-UP (DEFAULT) VALUES 
T7RT2 
SAVREG VE THE REGISTERS 
035672 MOV ST7PKT LR STAR ART OF THE PACKET 
100204 MOY #1 100204" tans s WRITE gg hog dy WITH ACK, IE 
035702 MOV A Sige (R1)¢ sADDRESS OF CHAR DATA BLOCK 
CLR 2EX XTENDED ADDRESS 
000010 BOY 9 SIZE OF DATA BLOCK IN BYTES 
035714 nr Inen ian · sADDRESS OF MESSAGE BUFFER 
000016 an sLENGTH OF MESSAGE BUFFER 
CLR 
035714 CLR sCLEAR 1ST LOC IN MESSAGE BUFFER 
7 RTS SRETURN 
ENDTST 


L10061: 
TRAP 


CSETST 


CZTUWAO TUBO FRONT END PRT A 
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TEST &: NON-TAPE MOTION COMMANDS 


6116 
6117 
6118 
6119 
6120 
6121 
6122 
6125 
6124 
6125 
6126 
6127 
6128 036704 
036 
036704 002170 
61350 036710 012737 005672 002146 
6131 036716 003100 
36 036722 012700 
6137 036726 7 017226 - 
036732 012757 2 002164 
6139 036740 
6140 036740 
036740 
036740 104402 
6141 
6142 036742 
0367 a 012700 000000 
036746 104441 
os 036750 0047357 016464 
6144 036754 103405 
6148 036756 010001 
6149 036760 
0367 
037510 
010152 
040314 
037440 





38 I fie T7876 


-SBTTL TEST 8: NON-TAPE MOTION COMMANDS 
THIS TEST VERIFIES PROPER OPERATION OF THE INITI 
3¢ TWO SUBTESTS ARE USED. THE FIRST ye IE 
THE COMMAND RUNS TO COMPLETION AND STORES A VALID 
SMESSAGE PACKET. THE SECOND VERIFIES THAT NON-ZERO 
; VALUES IN THE COMMAND MODE FIELD CAUSES COMMAND REJECT. 


i 
S THA 























































BGNTST — 
CLR FLG SCLEAR FATAL ERROR FLAG 
MOV Pent EPRI Su [SET UP ERROR MESSAGE SWITCH 
CLR  —sKTFLG sHOLD OFF KT1 
MOV STSTBID.RO sASCII MESSAGE TO IDENTIFY TEST 
JSR sé, TStSETuP 700 INITIAL TEST SETUP 
— mov 2. :T6õot [PERFORM 2 ITERATIONS 
3 
BGNSUB TTL BEGIN SUBTEST J//I/IIIIU11 
*"" TRAP se C$BSUB 
SETPRI #PRIOO SLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV —- #PRIOO.RO 
TRAP  CS$SPRI 
JSR «PC, SOF INIT D0 SOFT INIT OF CONTROLLER 
zeßs 38 BR IF SOFT INIT = 
mov _—s- RO, RI “SAVE CONTENTS OF TSSR 
ERRDF ERRNO.SFIERR.SFIMSG | :DEVICE FATAL ERROR DURING 1 INIT 
c 801 
“WORD  SFIERR 
ee ; SF IMSG 
; MOV 0s #TBPK2.RG SWRITE CHARACTERISTICS PACKET 
JSR «PC, WRTCHR TISSUE WRITE CHARACTERISTICS 
zts G “BR, If COMMAND ISSUED OK 
ERRHRD ERRNO, WRIMSG, SF IMSG WRITE CHARACTERISTISC FAILED 
TRAP  CSERHRD 
; 802 
; WRTMSG 
“ ; SF IMSG 
JSR EST SET UP PACKET FOR COMMAND 
* MOV APACE, Ro “GET THE ADDRESS OF COMMAND PACKET 
: BGNSEG :>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
: TRAP  CSBSEG 


108: CLR FATFLG sCLEAR FATAL ERROR F 


LAG 
:CLEAR INTERRUPT RECEIVED FLAG 





CLR 
8 “SET THE PACKET ADDRESS 
JSR PC CHKTSSR “WAIT FOR SSR TO SET 


SEG 155. 


7 — — — — 


——— — ——— — — — — — 


, 61 
6193 037136 
37136 
037140 
Aa 
037144 
6194 58 
6195 03571 
6196 8433 
6200 037154 


6169 037046 
6173 33 


6182 037100 
100 

037102 
104 


37106 
6183 phy 
6184 0357114 





010001 


104455 
001445 


0004 
011520 
004 


CZTUWAO TUBO FRONT END PRT A 
TEST 8: 


017720 


002172 


010554 


7? 002170 


017772 
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NON-TAPE MOTION COMMANDS 


15$: 


228: 


253: 


59$: 


MOV 
ERRDF 





RO,R1 
ERRNO, TESSR ,PKTSSR 


PC .FATCHK 
SEG 


INTRECV 
ERRNO, TENINT PKTSSR 


TSSRCRS) RI 
@SSR,R2 
25 

#OFL .R2 
R2,R1 
ERRNO, TONBA, PKTSSR 





ce CKRAR 
ERRNO .PKTRAM, RAMERR 


FATFLG 
PC ,CKDROP 


sSAVE CONTENTS OF TSSR 
SDEVICE FATAL SSR a. TO Ia 









ts al 
"WORD 80 
«WORD —*8 


«WORD PKTSSR 
sINC_AND CHECK FOR —9 THAN 25 ERRORS 
sLOOP ON ERROR, IF FLAG SET — 


sBY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
10000$-. 








sDID AN INTERRUPT OCCUR ? 
“BRANCH IF YES 


TRAP 





CSERHRD 
804 





GET THE CONTENTS OF TSSR 
EXPECTED CONTENTS OF TSSR 
1S OFFLINE air SET ? 


BRANCH T OFF-LINE 

;SET OFF-LINE IN EXPECTED DATA 
DOES EXPECTED MATCH RECEIVED ? 
OKAY IF MATCH 

sNBA NOT ZERO 

















TRAP 
- WORD 








sCHECK RAM TO MEMORY 
;RAM 


“THEY DON’T MATCH 
TRAP  CSERHRD 
WORD 


~ WORD 
-WORD RAMERR 
3 RKKKKKKKKKKKK END SEGMENT <<KKKKKKKKKKK 
10000$: 


806 
PKTRAM 














TRAP CSESEG 
s\AANANANANAAA a NANANAASANAAN 


CSESUB 
sANY FATAL ERRORS ? 
BRANCH T 


s If NO 
sTRY TO DROP THE UNIT 








SEQ 154 


— —— — — — 


— — — — — — 


— — — — — — — — — 


— —— —— —— — — — 


SELLERLLEE 
NAULSWN Oo 


037202 

037202 

037202 

6218 

6219 037204 
037204 


037210 
6220 037212 


, 037212 


6222 

6225 037214 
6224 037220 
6228 037222 
6229 —35 





CZTUWAO TUBO FRONT END PRT A 
TEST 8: 


104402 
012700 000000 
104441 
104404 
004737 016464 
103405 
010001 
104455 
1447 
003550 
11 
012704 057510 
737 010152 
103404 
104456 
001450 
754 
011506 
737 040314 
012704 037440 
5037 002172 
052714 007400 
10465 177776 
004737 017054 
103405 
010001 
104455 
001451 
011520 
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NON-TAPE MOTION COMMANDS 


3* 


es 8, SUBTEST 2 


:CHECK THAT NON@-ZERU MODE BITS BEING SET CAUSES 
: INITIALIZE COMMAND TO BE REJECTED 


3$: 


15$: 


BGNSUB 


SETPRI 


JSR 
BCS 


MOV 
ERRDF 


CKLOOP 
ESCAPE 


#PR100 


PC SOF INIT 
3$ 


RO,RI 
ERRNO, SFIERR,SF IASG 


#T8PK2 ,R4 


PC ,WRTCHR 


4 
ERRNO ,WRIRSG SF IASG 


PC, TEREST 
STBPACKET RG 
IMT RECV 

#P MODE, (R 


Ro, 316 
PC CHKTSSR 
153 


RO.R1 
ERRNO, TESSR.PKTSSR 





SIIITITATT NT - * ee ULL 


TRAP C$BSUB 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV #PRIOO,RO 








TRAP Cc 
$>>>>>>>>>>>> — SEGMENT >>>>>>>>>>>> 
TRAP CSBSEG 


:D0 SOFT INIT OF CONTROLLER 

sBR IF SOFT INIT = OK 

;SAVE CONTENTS OF TSSR 

SDEVICE FATAL ERROR ome * INIT 














CSERDF 

. 807 
WORD SFIERR 
WORD SFIMSG 

sWRITE CHARACTERISTICS PACKET 

3 ISSUE WRITE CHARACTERISTICS 

IF COMMAND ISSUED OK 

SURITE CHARACTERISTISC FAILED 
TRAP CSERHRD 
WORD 808 
-WORD WRTASG 
-WORD SFIMSG 








sSET UP PACKET FOR "COMMAND 
7GET THE ADDRESS OF COMMAND PACKET 


> CLEAR INTERRUPT RECEIVED FLAG 
MODE BITS 


ERO COMMAND 

iSeT THE PACKET ADDRESS 
WAIT FOR SSR TO SET 

BR IF CARRY SET (GOOD RETURN) 

3SAVE CONTENTS OF TSSR 

sDEVICE FATAL SSR FAILED — : 











WORD 

~WORD TSSSR 
~ WORD 

;LOOP ON ERROR, IF FLAG 3 

sBY-PASS CHECKS IF FATAL ERROR 
TRAP 


— — — 


SEQ 155 | 


| 
| 
| 


LE LAL — A — —— 


— — — — 


6254 037330 


005737 
001004 


011520 


004737 
103405 


104456 
001454 
004643 


420 016200 


0 
6278 037422 
037422 
037422 
6279 
6280 037424 


037424 
037424 


104405 


104403 


CZTUWAO TUBO FRONT END PRT A 
TEST 8: 





002172 


000000 
100206 
000100 


000100 


010354 


228: 


25$: 


30S: 
358: 


59$: 


TST 
BNE 
ERRHRD 


JSR 
BCS 
ERRHRD 


ENDSEG 


N12 
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NON-TAPE MOTION COMMANDS 


INTRECV 
ERRNO, TENINT ,PKTSSR 


(RS) RI 
#SCiSsRITSREJ, R2 
#OFL,R1 


#OFL R2 
R2,R1 


30 
ERRNO, TS2REJ ,PKTSSR 


— 
ERRNO ,PKTRAM,RAMERR 


3010 AN [va OCCUR ? 












sBRANCH 
TRAP CSERHRD 
— 810 
«WORD TSNINT 
-WORD PKTSSR 
3GET THE CONTENTS OF TSSR 
Arig ey gg OF TSSR 
31S OFF-LINE BIT SET ? 
BRANCH IF NOT OFF-LINE 
:SET OFF-LINE IN N EXPECTED DATA 
sDOES EXPECTED MATCH RECEIVED ? 
sOKAY IF MATCH 
:COMMAND NOT REJECTED 
TRAP CSERHRD 
WORD 811 
TS2REJ 
d PKTSSR 
Ho ge RAM TO MEMORY 
sTHEY DON'T MATCH 
TRAP CSERHRD 
-WORD 812 
-WORD PKTRAM 
-WORD RAMERR 
§MKK KKK END SEGMENT <<<<<<dddeddc< 
TRAP CSESEG 
s\\NANANAANANAN END SUBTEST \ANAAANAAAANNN 
110070: 
TRAP CSESUB 


SEQ 156. 


| 
| 
— 
— — — — — — 
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TEST 8: NON-TAPE MOTION COMMANDS 


6284 037426 EXIT TST sALL DONE THIS TEST 















037426 104432 TRAP XIT 
5 0374350 000776 - WORD t10066~. 
3¢ 
sLOCAL STORAGE FOR THIS TEST 
6291 037432 —BLKB 3 10°<.-TUV2AE7> 
6293 037440 TSPACKET: :COMMAND PACKET FOR TEST 
037440 100204 ~WORD 100204 sWRITE CHAR COMMAND, WITH IE, ACK 
037442 037450 eWORD T8DATA sADDRESS OF CHARACTERISTICS BLOCK 
6296 037444 000000 WORD 0 
6297 037446 000010 WORD 8&8. sSTARTING VALUE OF BLOCK SIZE 
6299 037450 T8DATA: s CHARACTERISTICS DATA BLOCK 
6300 037450 037462 -WORD TSBFR sADDRESS OF MESSAGE BUFFER 
6301 037452 000000 WORD 0 
6302 037454 000016 WORD 14. sLENGTH OF MESSAGE BUFFER 
38 037456 000000 000000 WORD 0,0 
6305 037462 TSBFR: .BLKW 8. sMESSAGE BUFFER 
6306 
6309 037502 —BLKB 10°<.-TUV2A87> 
6311 037510 T8PKe: sCOMMAND PACKET FOR TEST 
037510 100204 -WORD 100204 sWKITE CHAR COMMAND, WITH IE, ACK 
037512 037520 eWORD TBDTA ADDRESS OF CHARACTERISTICS BLOCK 
6314 037514 000000 WORD 0 
33 037516 000010 WORD &. sSTARTING VALUE OF BLOCK SIZE 
6317 037520 TEDTA: s CHARACTERISTICS DATA BLOCK 
6318 037520 037532 WORD T8BF2 sADDRESS OF MESSAGE BUFFER 
6319 037522 000000 WORD 0 
057524 000016 WORD 14. sLENGTH OF MESSAGE BUFFER 
peat 037526 000000 000000 WORD 0.0 
ores 037532 TSBF2: .BLKW &. sMESSAGE BUFFER 





6330 
6331 037552 













111 116 111 "INITIALIZE Command Not 8* 
6332 Wu 111 116 111 ‘INITIALIZE Not —223 vi iE -tore Mode Field’ 
6333 0376 107 105 124 "GET STATUS Not Accep 
6334 037723 107 105 124 "GET STATUS Not Rejected With Non-Zero Mode Field’ 
6335 040004 103 187 156 "Contents of TSSR Incorrect After Me 

103 157 156 "Contents of TSSR Incorrect After GET 
6337 040134 105 170 160 ‘ "Expected Interrupt Not Received On INITIALIZE* 
6338 040212 111 156 143 T — "Incorrect TSBA Address After INITIALIZE* 
6339 040262 116 187 156 TST8ID: ao *Non-Tape Motion Commands’ 





6340 
6341 


; 
' 
; 
a — — — — — ——— — ———— — — —— 










6350 
6351 040314 
6352 & 


6371 

6372 040356 
63735 040356 
6374 040362 
6375 040366 
6376 040372 


6377 0403574 
6378 040576 
6379 


6381 040404 
ose 040406 
040410 
6384 040412 
6385 040416 
040420 
040420 
040420 


012701 
012721 
21 


012701 


CZTUWAO TUSO FRONT END PRT A 
TEST 


6343 
6344 


037440 
100215 


037462 


037440 
100217 


037462 


3* 


cB 
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— — OO — — — — — — 


SROUTINE TO RESTO®E COMMAND PACKET TO START-UP (DEFAULT) VALUES 
s INITIALIZE COMMAND 


TSREST: 


#TSPACKET RI 


#1002135,(R1)+ 
1)¢ 


sGET STATUS COMMAND 


TERT 2: 


SAVREG 


STBPACKET RI 


#100217, ¢(R1)+ 
1)¢ 


sSAVE THE REGISTERS 
T OF THE PACKET 

ACK, JE 

DATA BLOCK 


25 HE PA 
s INITIALIZE WITH 
sADDRESS OF CHAR 
s EXTENDED 


ADDRE 
sSIZE OF DATA BLOCK IN BYTES 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


CLEAR 1ST LOC IN MESSAGE BUFFER 
;RETURN | 


sSAVE THE REGISTERS 


sSTART OF THE PAC 
GET STATUS WITH ACK, IE 
ADDRESS OF CHAR DATA BL 


KET 


XTENDED ADDRESS 
SIZE OF DATA BLOCK IN BYTES 
ADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


L10066 


sROUTINE TO RESTORE COMMAND PACKET TO START-UP (DEFAULT) VALUES 


CLEAR 1ST LOC IN MESSAGE BUFFER 
; RETURN 


” TRAP 


CSETST 


SEO 158, 


— 


; 
— OE — —— — — —— — — — — 


— — — 


CZTUWAO TUBO FRONT END PRT A 
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ed ed ed ed aed 
Bua APunmos 


Eee 


33 


wad and oad 


? 228 33388828 
* 
— 


005037 
012737 
005037 
012700 
004737 
012737 


002170 
005672 002146 
003100 


042070 
017226 
000002 002164 


+ 
+ 


dD 13 
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-SBTTL TEST 9: DRA MEMORY ADDRESSING 


TEST 1 
TEST DESCRIPTION 


This test verifies that the controller can properly address and 
access all available CPU memory (other than that occupied by the 
diagnostic and diagnostic supervisor code) for ooth reading (DATI) 
and writing (DATO). Verified are the LSI-11 Bus drivers for ali 
available address Lines. Up to this point only 16 bits have been 
used for DMA transfers. 


TEST STEPS 
REPEAT FROM 1 TO LOOPCNT 
BEGIN 


Do Subtest 1 - Verify GET STATUS selected locations 

Do Subtest 2 - Verify message packets selected locations 

Do Subtest 3 - Verify Characteristic data selected locations 
Do Subtest 4 - Verify NXM to selected invalid addresses 


END 

BGNTST ° 
CLR FATFLG SCLEAR FATAL ERROR FLAG 
MOV §- @EPRT1, EPRTSW SSET UP ERROR MESSAGE SWITCH 
CLR KTFLG sHOLD OFF KT 
MOV =: #TST9ID.RO sASCII MESSAGE TO IDENTIFY TEST 
JSR PC, TSTSETUP [D0 INITIAL TEST SETUP 
MOV = #2.,,LOOPCNT SPERFORM 2 ITERATIONS 

TOLOOP SLOOP ON TEST LABEL 


SEQ 159, 


! 





E 15 


@ 160. 
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8 a eSBTTL TEST 9: SUBTEST 1: GET STATUS SELECTED LOCATIONS 
TEST 9: SUBTEST 1: 
SUBTEST DESCRIPTIUN: 


This subtest verifies the controller can fetch a get status 
command from all available memory locations. 

Two word blocks are tested one at a time by first setting 

all available memory to a background pattern of 125252. 

A Get Status command is then executed to various seddresses in 
each available memory 4k word block. The various addresses 

are determined by floating a 1 then a 0 through the address bits. 


TEST STEPS: 
BEGIN 
FILL Memory with background — of 125252 
Write to TSSR to soft initialize 
Do a WRITE CHARACTERISTICS to setup a message buffer 
we ay SELECTED VALID ADDRESSES IN DIAGNOSTIC FREE SPACE AND ABOVE 32k 


Get a valid modulo-4 test address 
Do a GET STATUS command from the test address 


reg spoerernecs 



























64 
6455 END 
ss ‘ 
6458 040456 BGNSUB TLL BEGIN SUBTEST //////001/ 
— 040456 104402 *" TRAP cssscus 
6460 sFiLL Memory with beckground pattern of 125252 
6461 040460 012700 125252 MOV #125252 RO sBACKGROUND DATA 
6462 040464 004737 020212 JSR PC, FILLER “FILL MEMORY WITH BACKGROUND DATA 
6464 sWrite to TSSR to soft initialize 
016464 JSR PC, SOF INIT sD0 SOFT INIT OF CONTROLLER 
acs 15$ “BR IF SOFT INIT = OK 
NEXT ERRNO 
MOV ort sSAVE CONTENTS OF TSSR 
ERRDF ERRNO, SFIERR,SFIMSG “DEVICE FATAL ERROR DURING INIT 
TRAP  CSERDF 
WORD 901 
"WORD © SFIERR 
SF IMSG 
Be @ WRITE CHARACTERISTICS to setup a message buffer 
041660 "mov @TOPACKET, R4 GET THE ADDRESS OF COMMAND PACKET 
043426 JSR — TOSURT “RESTORE PACKET TO STARTING VALUES 
003102 CLR KTENABLE STURN OFF KT- 
177776 MOV R&, TSDB(RS) “SET THE PACKET ADDRESS 
017054 JSR . PC.CHETSSR SWAIT FOR SSR TO SET 
FORCERROR | “AR 16 S&R SET IN CHKTSSR _ 





— — — — — 


CZTUWAO TUSO FRONT END PRT A 


TEST 9: SUBTEST 1: GET 
010001 


104455 
001606 
042172 
040562 011520 
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003102 


041730 


17$: 


F 15 
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MOV RO,R1 
NEXT .ERRNO 
ERRDF ERRNO, TOWRTSSR,PKTSSR 


Get a 
0s: 
CLR 
MOV 
T91LOOP: 
CL 


25$: 


70$: 


CKLOOP 





BHIS 
JMP 
TST 
BGT 
TST 
BEG 








FORCEXIT 
CAP 


TOKT 
#TOBLK .R2 


KTENABLE 
(R2)+,R1 
RO 










T91LOOP 
TOKT 
80S 
KTFLG 


#1, T9KT 
aT9OLK RZ 


191 
A 





—* 
70$ 





sSAVE CONTENTS OF TSSR 

sDEVICE FATAL SSR FAILED 10 SET 
TRAP 
«WORD 
«WORD 


-WORD PKTSSR 








:Verify a Get Status can be nano from each address 
valid modulo-4 test addre 
& “eer, res —— from the. test address 


sCLEAR FATAL ERROR FLAG 

sTEST ABOVE 28K SWITCH 

POINT TO TEST PATTERN TABLE 
sTURN OFF ABOVE 28K TEST FLAG 

:GET TEST PATTERN ADDRESS 
sASSUME NO TEST ABOVE 28k 

TEST ABOVE 28K THIS TIME? 

sBR IF NO 

3GET TEST PATTERN AGAIN 

18 BIT ADDRESS ; 















;TURN ON ABOVE 26K TEST FLAG 
;CONVERT TEST PATTERN TO TEST ADDRESS 
F INVALID PACKET ADDRESS 





sSAVE ADDRESS 
; SETUP 18 Md PACKET ADDRESS 
sTURN OFF 


SET THE PACKET ADDRESS TO EXECUTE 
sWAIT FOR SSR TO SET 


sBR IF SSR SET IN CHKTSSR 
;SAVE CONTENTS OF TSSR 


sDEVICE FATAL SSR FAILED TO SET 
TRAP 














. 3 

° T9GETSSR 

WORD PKIGETS 
sLOOP ON ERROR, IF FLAG SET 

TRAP CSCLP1 


oo NES TEST PATTERNS? 





“BR If YES 
s ANY MEMORY ABOVE 26K ON SYSTEM? 





SET est » TABLE 
are i 





: do v0 nel TEST 





SEQ 161. 
i 


6 15 
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TEST 9: SUBTEST 1: GET STATUS SELECTED LOCATIONS 
6528 041012 ENDSUB 
041012 104403 
$3 —818 pope 002170 TST FATFLG 
re 041022 004737 01/772 JSR PC ,CKDROP 
6532 041026 100$: 


3 ANY ae — ? 
STRY TO DROP THE UNIT 


— — — — 


ů:—:. VXXXVXVX 7 Pe ata VVVVVVVXX 


CSE sus 


SEQ 162 


CZTUWAO TUBO FRONT 
TEST 9: SUBTEST 2: 





S58 ap 
eure 





PRT A MACRO M1200 29-MAR 
SAGE PACKETS TO SELECTED LOCATIONS 


125252 
020212 


016464 


- 
FILL Memor 





H 13 
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-SBTTL TEST 9: SUBTEST 2: MESSAGE PACKETS TO SELECTED LOCATIONS 


+ 
TEST 9: SUBTEST 2: 
SUBTEST DESCRIPTIUN: 


This subtest verifies the controller can deposit message packets 
to all available memory locations. 
riree ee available memory is set to a background pattern 


Write Characteristics commands are then executed with message 
buffer addresses set to various addresses in each available 
memory location. 

The various addresses are determined by floating a 1 then a 0 
through the address bits. 


TEST STEPS: 





with background pattern of 125252 
Write to TSSR to soft initiali 
Do a WRITE CHARACTERISTICS to setup a message buffer to compare 


ie SELECTED ADDRESSES IN DIAGNOSTIC FREE SPACE AND ABOVE 32k 


ot 8 Mig be. Beg in test address 
— Bg —83*8 bufrer to * che TEST ADDRESS 

ol a URITe CHARACTER sTICcS 

Restore the test message buffer to background pattern 





BGNSUB SAVIITTTTTTTT BEGIN SUBTEST (7/47/4017 


"TRAP CSBSUB 


sFitt * with beckground pattern of 125252 


sWrite to TSSR to soft initialize 
JSR PC SOF INIT 


#12525 
JSR PC FILLMER 





sBACKGROUND DATA 
FILL MEMORY WITH BACKGROUND DATA 





:DO SOFT INIT OF CONTROLLER 
acs 158 “BR IF SOFT INIT = OK 


NEXT .ERRNO 








MOV RO.R1 sSAVE CONTENTS OF TSSR 

ERRDF ERRNO, SFIERR,SF IASG DEVICE FATAL ERROR ee INIT cosens 
WORD 904 
WORD  SFIERR 
-WORD SFIASG 


“Do a WRITE CHARACTERISTICS to setup a message buffer to compare 


15S: 


STOPACKET ,R4 :GET THE ADDRESS OF COMMAND PACKET 
ask PC, TOSURT SET PACKET TO WRITE CHARACTERISTICS 
JSR PC .KTOFF ___ SRM OFF KT-12 0 


— — — — = 


SEQ 163 






















1 13 





































Q 166. 
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TEST 9: SUBTEST 2: MESSAGE PACKETS TO SELECTED LOCATIONS | 
6586 041074 010465 177776 MOV Ré, TSOBCRS) :set THE PACKET ADDRESS 
6587 041100 004737 o1705¢ JSR PC. CHKTSSR WAIT FOR SSR TO SET 
6588 041104 FORCERROR 17% 
6589 041120 103405 zon IF SSR SET IN CHKTSSR 
6590 041122 010001 MOV RO, KI SSAVE CONTENTS OF TSSR 
6591 041124 NEXT ERRNO 
041126 17S:  ERRDF ERRNO,TOWRTSSR.PKTISSR ;DEVICE FATAL SSR FAILED TO SET 
041126 104455 TRAP 
061126 001611 ; 
041130 042172 ; 
041132 011520 ‘ 
sGet a valid sense’ test eddress 
4596 Set the fecha tenferie pes rer to the test address 
6595 “Do @ WRITE CHARACTER 
6596 041134 005037 002170 308: SCLEAR FATAL ERROR FLAG 
041140 012703 041734 8 —2— “POINT TO TEST PATTERN TABLE 
6598 041144 T92LOOP: 
6599 041144 012301 MOV (R3)¢,R1 :GET TEST PATTERN ADDRESS 
6600 041146 010100 MOV R GET ADDRESS ALL ‘18 alts" 
6601 041150 042700 177776 Bic 8177774 ,.RO SLEAVE ONLY A17 AND A16 
6602 041154 042701 000001 BIC #1,R1 SALWAYS ON A WORD BOUNDRY 
6603 041160 004737 043130 JSR pc. T9CT2 *CONVERT TEST PATTERN TO TEST ADDRESS 
6604 041164 103402 acs 25$ [BR IF VALID MESSAGE BUFFER ADDRESS 
6605 041166 000137 041266 JMP 1508 °GET ANOTHER TEST PATTERN TO TRY 
6606 041172 012704 041660 25$: MOV STOPACKET RG [SET THE COMMAND PACKET ADDRESS 
6607 041176 004737 043426 JSR PC, TOSURT “SETUP TOPACKET TO WRITE CHAR. 
6608 0641202 013737 041724 041670 MOV TOLOADD,TODATA ;SETUP LOW ORDER MESSAGE BUFFER ADD. 
6609 041210 013737 041722 041672 MOV TOHIADD, TODATAS2 sSETUP HIGH ORDER MESSAGE BUFFER ADD 
6610 041216 004737 STURN OFF KT-11 
6611 041222 010465 177776 *SET THE PACKET ADDRESS TO EXECUTE 
e612 041226 004737 017054 SWAIT FOR SSR TO SET 
6613 041232 
6614 041266 103405 sBR IF SSR SET IN CHKTSSR 
6615 061250 010001 SSAVE CONTENTS OF TSSR 
6617 041252 328: sDEVICE FATAL SSR FAILED TO SET 
041252 TRAP  CSERDF 
041254 rt 
041256 . TOURTSSR 
041260 "WORD PKTSSR 
6618 041262 50$:  CKLOOP SLOOP ON ERROR, IF FLAG SEI 
041262 CSCLP1 
6619 041 150$: FORCEXIT 1608 
6620 041274 042066 CMP R3,¢T9TBE ZDONE ALL TSTOBLK TEST PATTERNS? 
6621 041 BHIS 1608 FY 
B338 —8 160s: Sc PCCRTOFF * ANOTHER PODULO. ¢ ADDRESS 
8 ð te ENDSUB *ANNANANAANANA END oguatest AAANAAAAAAANA 
041312 104403 CSESUB 
sg felt Suzan O17 gh me eect ars * 
6627 041322 004737 017772 JSR PC, CKOROP “TRY TO DROP THE UNIT 
6628 041326 180S: 





; 


CZTUWAO TUBO FRONT END PRT 
TEST 9: SUBTEST 5: 





125252 
020212 


016464 


6679 0615 
4480 0413746 


—_—_——— — — — — — — —— —— 


J 13 
83 13:24 PAGE 100 
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Fs ~SBTTL TEST 9: SUBTEST 3: CHARACTERISTIC DATA SELECTED LOCATIONS 
TEST 9: SUBTEST 35: 
SUBTEST DESCRIPTIUN: 


This subtest verifies the controller can fetch a 

Write — data block from all available 

menory 

—* —V———— memory is set to ↄ background 
attern o 

Ch hen Write Characteristics commands are executed with 
characteristic dete blocks at various memory addresses. 
The various memory addresses are — — by floating 
ai then a 0 through the address bits. 


TEST STEPS: 


BEGIN 
FILL Memory with background pattern of 125252 
Write to TSSR to soft initialize 


a FOR SELECTED VALID ADDRESSES IN DIAGNOSTIC FREE SPACE AND ABOVE 52k 


Get a valid test address 

Set the test packet characteristics data pointer to the 
test address. 

ted characteristic data in test address block 

Do a WRITE CHARACTERISTIC command 





‘f Se Ge Ge Ge Ge Se Ge Ge Be Ge Ge Ge Ge Ge Ge Ge Se Ge Ge Se Ge Ge Ge Ge Ge Ge Ge Ge Ge Se 
+ 


BGNSUB ITLL BEGIN, SUBTEST TTL 
* csasus 





zfill Memory with background pattern of 125252 
BOV #12525 sBACKGROUND DAT 
sFILL MEMRCRY 3. BACKGROUND DATA 


JSR PC .FILLAER 
sWrite to TSSR to soft initialize 
JSR PC SOF INIT 





300 SOFT a” OF CONTROLLER 
INIT = OK 











BCS sBR IF SOFT 

NEXT .ERRNO 

MOV ROR SAVE CONTENTS OF TSSR 

ERRDF ERRNO, SFIERR,SFIASG DEVICE FATAL ERROR ee INIT conens 
WORD 907 
WORD  SFIERR 
. SFIMSG 





-Get a valid test address 
50$: CLR FATFLG sCLEAR FATAL ERROR FLAG 
CLR T9OKT TEST ABOVE 28K SWITCH 
BOY @T9BLK RS “POINT TO TEST PATTERN TABLE 


T9SLOOP: — — — 


— — — 


Re — —— — —— — — — — — 


Kk 13 
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MACRO #1200 SEQ 166 
TEST 9: SUBTEST 5: CHARACTERISTIC DATA SELECTED LOCATIONS 
















6681 041374 005037 003102 CLR KTENABLE ; 
6682 041400 012301 MOV (R3)+,R1 ° GE 
6683 041402 010100 MOV R1,RO GE | 
6684 041404 042700 177774 BIC #1777746 ,R0 : | 
6685 041410 042701 000003 BIC #3,ni ; 
6686 041414 737 041730 TST : | 
6687 041420 901407 BEQ ; 
6688 041422 016300 177776 MOV =2(R3) ,RO ; | 
6689 041426 2700 17777 BIC #*C<A1716>,RO : 
6690 041432 012737 1 003102 MOV #1, KTENABLE : 28K TEST FLAG 
6691 041440 004737 042736 25$: JSR PC, TOCONVERT ; TEST PATTERN TO TEST ADDRESS 
6692 041444 103402 acs 30$ 3BR I VALID TEST § 
6693 041446 137 041550 JP 608 sGET NEXT TEST PATTERN 
6694 Set the test packet characteristics data a porate’ to the test address 
6695 041452 012704 041660 30s: MOV BTOPACKET — T THE ADDRESS OF COMMAND PACKET 
66% 041456 737 JSR PC, TOSURT sRESTORE PACKET TO STARTING VALUES 
6697 041462 MOV TOLOADD ,PKLOW(R4) *STORE CHAR. DATA PT R LOW ADDRESS 
6698 0414 TOHIADD .PKHI (R4) “STORE CHAR. DATA PTR HIGH ADDRESS 
6699 041476 JSR PC, TOCHAR “STORE EXPECTED DATA IN DATA BLOCK 
6700 sDo a WRITE CHARACTERISTIC command 
6701 041502 JSR C .KTOFF sTURN OFF KT-11 
6702 041 MOV R4, TSDB(RS) ser THE PACKET ADDRESS TO EXECUTE 
6703 041512 JSR PC, CHKT WAIT FOR SSR TO SET 
6704 041516 FORCE 
6705 041 acs 408 sBR IF SSR SET IN CHKTSSR 
6706 0415 MOV ; *SAVE CONTENTS OF TSSR 
6707 041536 NEXT .E 
6708 041 32:  ERRDF ERRNO, TOWRTSSR,PKTISSR ;DEVICE FATAL SSR FAILED TO SET 
0415 TRAP CSERDF 
041540 .WORD 
041542 “WORD TOWRTSSR 
041544 .WORD PKTSSR 
6709 041546 40$:  CKLOOP sLOOP ON ERROR, IF FLAG SET 
041546 TRAP CSCLP1 
6710 041550 60S: 
6711 041550 020327 042066 CMP R3,eT9TBE :DONE ALL TSTBLK TEST PATTERNS? 
6712 041554 103002 BHIS 65% IF YES 
6713 061556 000137 041374 JMP T93L00P :d0 ANOTHER ODULO- 4 ADDRESS 
714 061562 005737 041730 658: TST TOKT sDONE ABOVE 28K TESTING 100? 
041566 003012 acl 708 BR IF YES 
041570 005737 003100 TST Y MEMORY ABOVE 28K ON SYSTEM? 
041574 001407 BEQ ion I 
061576 012737 000001 041730 MOV sSET SWITCH 
1604 012703 041734 MOV sRESET TEST PATTERN TABLE 
els, OORT3? 20006 708: eR PELKIOFF :00 ABOVE 28K TESTING, 
1 S\ANANNANAAAAN END SUBTEST \AAAAAAAANA 
{ 110074: 
{ TRAP CSESUB 





002170 
017772 
017174 
040456 











TST FATFLG 
BEO 
JSR PC, CKDROP 
758: 
100$: JSR PC, TSTLOOP 
acc 1058 
JAP 

































sANY FATAL ERRORS ? 

BRANCH 

TRY TO DROP THE UNIT 

s SHOULD WE DO ITERATIONS? 

LOOP UNTIL ITERATION COUNT — 


a 


— — — — — — 





CZTUWAO TUSO FRONT END PRT 


TEST 9: SUBTEST 5: 


6731 
6732 041652 
652 





— 041676 
8 041702 
6756 041722 


exit 
104432 
001724 
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CHARACTERISTIC DATA SELECTED LOCATIONS 


646 004737 020064 JSR 


PC ,KTOFF TURN OFF MEMORY MANAGEMENT 
TST ALL DONE THIS TEST ; 


RAP C 
WORD 110071-. 


3* 
sLOCAL STORAGE FOR THIS TEST 


TOPACKET: 


TODATA: 





T9K 
restore WORD 





5555555555) 
—— 
25 














10-<.-TUV2ZA87> 
:COMMAND PACKET FOR TEST 
100004 WRITE CHARACTERISTICS COMMAND, WITH ACK 
_ SADDRESS OF CHARACTERISTICS BLOCK 
8. sSTARTING VALUE OF BLOCK SIZE 
sCHARACTERISTICS DATA BLOCK 
TOBFR sLOW ADDRESS OF —— BUFFER 
0 sHIGH ORDER OF F°SSAGE BUFFER 
14. SLENGTH OF MESSA‘.E BUFFER 
8. sMESSAGE BUFFER 
-WORD 0 Ary ADDRESS 
eWORD 0 eg 
0 SADDRESS’ iN N PAR F 
-WORD 0 sTEST ABOVE oF eK SWITCH 


ADDRESS TEST BIT 


STABLE OF ADDRESSES 





000001 
000002 
000003 
000005 


SEQ 167. 


nee el. lt tL — — — — — — — 


— —t— — — — 


— — = 





CZTUWAO TUSO FRONT END PRT 
TEST 9: SUBTEST 3: 


000402 
00040 


NNOO—SCO 
ia ond 
23833882 


— 


133 
83BB:2« PAGE 100-3 


MACRO M1200 29-MAR- 
CHARACTERISTIC DATA SELECTED LOCATIONS 


3 tit 





~ WORD 177777 


SLOCAL TEXT MESSAGES FOR TEST 


TST9ID: .ASCIZ ‘DMA Memory Addressi 
TOGETSSR: eASCIZ Contents of 









TONXM: 


-EVEN 


“Tose Incorrect After GET STATUS‘ 

——— eASCIZ “Contents of TSSR Incorrect After WRITE CHARACTERISTICS‘ 
TOMS eASCIZ ‘Ress Buffer Contents ——— After 
T9OBKGND: eASCIZ ‘bacheraund Pattern Distur 

TONINT: .ASCIZ ‘Expected Interrup 

TODPR: .ASCIZ ‘Write Characteristic data in ram does not match expected’ 

eASCIZ ‘TSSR NXM Dit failed to set when nor. existent memory address specifi 


t Not Received 





SEQ 168 


WRITE CHARACTERISTICS" 


TE CHARACTERISTICS" 
ERISTICS® 


— ann — 


CZTUWAO TUSO FRONT END P 


TEST 9: SUBTEST 35: 











MACRO 


em§@e Ge @e Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Se 


R 
OUPTUTS: 


N13 
29-MAR-83 15:24 PAGE 101 


M1200 
CHARACTERISTIC DATA SELECTED LOCATIONS 





S ROUTINE TO CONVERT A TEST PATTERN TO A VALID ADDRESS IN —ue 


DIAGNOSTIC FREE SPACE IS BETWEEN THE END OF THE DIAGNOSTIC 
BEGINNING 4 ove 2a SUPERVISOR. THIS IS ALWAYS BELOW 24K. 

IF MEMORY E 26K SPECIFIED (VIA R1) THEN PAR 6 IS SET 
TO THE RELOCATION BASE. 


RO HIGH ORDER ADDRESS BITS 
1 LOW ORDER ADDRESS BITS 


TOPAR6 = ADDRESS BIASED TO PARG6 IF *— UNDER TEST 
ADDRESS IN NON PAR6 FORMAT 


TOHIADD = HIGH ORDER 
TOLOADD = LOW ORDER ADDRESS IN NON PAR6 FORMAT 
C BIT = 1 IF GOOD ADDRESS 


RETURNED 
C BIT = O IF TEST PATTERN DID NOT YIELD A VALID ADDRESS 





SCONVERT: 
SAVREG sSAVE R1@RS UNTIL NEXT RETURN 
CLR TOLOADD ;CLEAR LOW ADDRESS 
CLR TOHIADD :CLEAR HIGH ADDRESS 
CLR TOPARG sCLEAR PAR6 BIASED ADDRESS 
BIC #°C<7777>,R1 ss SFORCE TO LOWER 12 BITS OF ADDRESS 
MOV RO.RS ;SAVE HIGH ORDER ADDRESS gis 
JSR PC .KTOFF ;SHUTOFF MEMORY MANAGEMENT 
MOV FREE ,R2 “GET FIRST FREE ADDRESS 

#16. .R2 SIN CASE TEST PATTERN=0 

ADD R1,R2 ZADD IN TEST PATTERN 
BIC 3,R2 IT MODULO=4 

25$: MOV FREEH!.R3 “GET LAST FREE ADDRESS 
SUB 16. .R3 “SAVE AT LEAST 8 WORDS (IN CASE MESSAGE BUFFER) 
MOV R2, TOLOADD “SAVE POSSIBLE LOW ADDRESS 
MOV 2; TOPAR6 “SAVE IT IN PAR6 BIASED TOO 
CMP —séR2, RS 31S THIS ADDRESS ABOVE FREE SPACE? 
BHI 35$ YES 
CMP R2, FREE “1S IT IN FREE SPACE? 
BHIS 508 “BR IF YES- ITS GOOD 
TST K TENABLE “TESTING ABOVE 28K? 
BNE 50$ “BR IF YES 
BR “BR IF NOT IN FREE SPACE 

35$: SUB #16. ,R2 “FORCE FIT THE TEST PATTERN 
BR 25$ “TRY THIS TEST PATTERN ADDRESS 

50$: TST KTENABLE “TESTING ABOVE 28K? 
BEO 100$ SBR IF NO 
TST KTFLG SANY MEMORY ABOVE 28K? 
BEQ SBR IF NO 
JSR PC, KTON “TURN ON MEMORY MANAGEMENT 
MOV f [GET HIGH ORDER ADDRESS 
MOV RO, TOHLADD ;SAVE POSSIBLE HIGH A 
MOV T COMPUTED L RESS 
JSR PC. SETMAP 
MOV RO, TOPAR6 
BCS 105$ : 

908:  cLC SCLR C BIT FOR FAILURE 

4 BR 105$ 
1008: SEC “SET SUCCESS 
105$: ARTs PC sRETURN 


SEQ 169° 


— — — 


sea 


' 
; 
— — — — —— — 


we TU8O Ae END PR 3 13:24 PAGE 102 





es 


6885 * FOR MESSAGE BUFFER ADDRESSES 

sROUT INE TO CONVERT A TEST PATTERN TO A VALID ADDRESS IN DIAGNOSTIC FREE SPACE 
DIAGNOSTI® FREE SPACE a BETWEEN THE END OF THE DIAGNOSTIC AND THE 
BEGINNING Or THE THIS IS ALWAYS BELOW 24K. 
IF MEMORY ABOVE 28K SPECIFIED (VIA R1) THEN PAR 6 IS SET 

TO THE RELOCATION BASE. 


HIGH ORDER ADDRESS BITS 
Ri LOW ORDER ADDRESS BITS 
OUPTUTS: 
TOPAR6 = ADDRESS BIASED TO PARG IF >28K UNDER TEST 
= HIGH ORDER ADDRESS IN NON PAR6 FORMAT 


TOHIADD 
TOLOADD = ORDER ADDRESS IN NON PAR6 FORMAT 






INPUTS 





a@eo Geo Ge Ge Ge Se Ge Ge Ge Ge Se Ge Ge Ge 








Ssesesecsessessraesseeee 









C BIT = 1 IF GOOD ADDRESS RETURNE 
C BIT = 0 IF TEST PATTERN DID NOT VIELD A VALID ADDRESS 
043130 9CT2 3; SAVE ay UNTIL NEXT RETURN 
043134 TOLOADD ;CLEAR LOW ADDRESS 
043140 TOHIADD ;CLEAR HIGH ADDRESS 
043144 TOPARG sCLEAR PAR6 ey ADDRESS 
043150 @*°C<7777>,R1 FORCE TO LOWER 12 BITS OF ADDRESS 
043154 s SAVE HIGH ORDER ADDRESS BITS 
043156 ;SHUTOFF MEMORY MANAGEMENT 
043162 
043166 
6910 043172 
6911 043174 25$: GET LAST FREE ADDRESS 
6912 043200 ;SAVE AT LEAST ry WORDS (IN CASE MESSAGE BUFFER) 
6913 043204 SAVE POSSIBLE LOW ADDRESS 
6914 043210 SAVE IT IN PAR6 BIASED TOO 
6915 0435214 1S THIS ADDRESS ABOVE FREE SPACE? 
6916 045216 YES 
6917 043220 1S IT IN FREE SPACE? 
6918 045224 sBR IF YES- ITS GOOD 
6919 oases ‘TEST ING ABOVE 28K? 
6920 0632 YES 
ors 043234 * If * IN FREE SPACE 
6922 045236 sFORCE FIT THE TEST PATTERN 
6923 043242 :TRY THIS TEST PATTERN ADDRESS 
6926 043244 TEST ING ABOVE 28K? 
6925 043250 IF NO 
8 04 ANY MEMORY ABOVE 28K? 
6927 04 :BR IF 
6928 04 ;TURN ON REMORY MANAGEMENT 
6929 GET HIGH ORDER ADDRESS 
6930 04 ;SAVE POSSIBLE HIGH ADDRESS 
6931 04 :GET COMPUTED LOW ORDER ADDRESS 
69 SRETURN PAR6 BIASED ADDRESS IN RO 
693 ;COPY PAR6 BIASED ADDRESS 
6934 04 BR IF VALID ADDRESS 
e986 Oe 8 34 C BIT FOR FAILURE 


038 oe3316 

















SET SUCCESS 
RETURN 


— — — — 


— — — — — — — 


C 14 









































Q 171. 
CZTUWAO TUBO FRONT END PR MACRO M1200 29-MAR-83 13:24 PAGE 103 ™ | 
TEST 9: SUBTEST 3: CHARACTERISTIC DATA SELECTED LOCATIONS 
6940 
6941 ‘ROUTINE TO READ THE FIRST 2 BYTES FROM RAM 
—38 ‘MEMORY AND COMPARE THIS DATA TO A COMMAND PACKET. 
6944 : ADDRESS OF THE COMMAND PACKET 
6945 : RS FIRST DEVICE UNIBUS ADDRESS 
6946 sOUTPUT: 
6947 ; CARRY ser “ - RAR MATCHES PACKET 
6948 RAM DOES NOT MATCH PACKET 
6949 IMPLICIT ourpuT; 
6950 : THE TABLE RAMDATA 1S FILLED WITH THE 
6951 ; DATA HELD IN 
6952 RAMSIZ SET 10 F FOR PRAMPKT ROUTINE 
6953 “SIDE EFFECTS: 
8 J THE SUBSYSTEM IS LEFT IN MAINTENANCE MODE 
6956 943316 TOCKRAM: : 
6957 043316 SAVREG sSAVE THE GENERAL REGISTERS 
043322 012701 002206 MOV _ #RAMDATA,R1 SADDRESS TO SAVE THE RAM DATA 
6959 043326 012702 000020 MOV ( @RMPKTBEG,R2 + 4 TE ADDRESS OF FIRST RAM DATA 
6960 043332 3 CLR  R3 CLEAR LAG 
1 043334 737 017054 JSR PC, 3138 
043340 112765 000000 177776 4OVB #0.1 (R5) 
043346 737 017054 108: 
6964 043352 010265 177776 
043356 004737 017054 
043362 116511 177776 sREAD THE T 
6967 043366 122124 CRI), (RO) ; COMPARE TO EXPECTED 
6968 043370 001401 20$ H IF OK 
6969 043372 5203 R3 SET ERROR FLAG 
6970 043374 202 208: R2 sADDRESS OF NEXT RAM LOCATION 
71 043376 27 000022 PRP R2, #RMPKIBEG?2 sDONE 2 BYTES? 
6972 043402 002761 BLT 108 BR IF NO 
6973 043404 703 TST RS *WAS AN ERROR FOUND ? 
6974 043406 001402 BEQ 308 sBRANCH IF NOT 
6975 043410 61 CLC sCLEAR CARRY TO SHOW ERROR 
6976 043412 1 BR 508 AND EXIT 
6977 043414 1 308: SEC SHOW GOOD COMPARE 
6978 043416 012737 000002 002246 50S: ACV #2, ,RAMSIZ > SETUP RAMS 12 
6979 043424 7 RTS PC sRETURN 
se 
8 SETUP PACKET TO WRITE C CTERISTICS 
6984 063426 
6985 * sSAVE THE REGISTERS 
6986 043432 012701 041660 STOPACKET RI sSTART OF THE PACKET 
6987 043436 012721 100004 #100004 , (R1)+ SURITE CHARACTERISTICS WITH ACK 
6988 043442 012721 041670 + al SS OF CHAR DATA BLOCK 
6989 043446 1 cri SEXTENDED ADDRESS 
6990 erty 012721 000010 #8. eats *SIZE OF DATA BLOCK IN BYTES 
6991 043454 012721 041702 STORER, ian · SADDRESS OF MESSAGE BUFFER 
one 043460 53 
6993 043462 012721 000016 #14... (RIDe sLENGTH OF MESSAGE BUFFER 
6994 884*8 005021 (R1)¢ 
6995 0434 005011 (R1) 
sms K£1G13% §=ARASAD er BE TIN 





—— — ee ee — — —ñ——— — — — — — 
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TEST 9: SUBTEST 5: CHARACTERISTIC DATA SELECTED LOCATIONS 


6997 
6998 
6999 
7000 
7001 


SEQ 172 








; ROUTINE TO SETUP A GET STATUS COMMAND PACKET AT CURRENT PACKET ADDRESS 
R3 ae ORDER PACKET ADDRESS 

R4 OW ORDER PACKET ADDRESS 

NOTE: a3. 1S IGNORED IF KTENABLE FLAG CLEAR 





= —— rs 


i9 
























7002 
7003 043474 OSETGET: 
7004 SAVREG sSAVE THE REGISTERS 
7005 323500 R4,R1 3GET LOW ORDER ADDRESS 
7006 043502 005737 003102 KTENABLE STESTING ABOVE 28K? 
7007 043506 10$ <BR IF NO 
7008 043510 R3,RO SGET HIGH ORDER ADDRESS 
7009 043512 004737 020106 PC, SETMAP “RETURN ADDRESS BIASED TO PARG IN RO 
7010 043516 MOV ñĩ z36 i ADDRESS 
1 043 000017 10$: MOV #P.GETSTATUS.RO :GET STATUS COMMAND CODE NO IE 

rote 043524 100009 BIS ACK, RO SET ACK 
7013 043530 010021 MOV RO, (RID* “STORE GET STATUS IN PACKET 

4 CLR cnt ye Cb EAR UNUSED WORD 
7015 043534 000207 ; RTS 
TON? “ROUTINE TO SETUP A CHARACTERISTIC DATA BLOCK AT A TEST ADDRESS 
7019 043536 TOCHAR: 


sSAVE RI°-RS UNTIL NEXT RETURN 
700 041670 MOV STODATA.RO GET TOPACKET DATA POINTER 
TOLOADD ,R1 NOT ABOVE 28K 


s ASSUME NOT 

TESTING ABOVE 28K? 

3BR IF NO 

3SET Hy +4 — ABOVE 28k 
sSTORE DATA WORD 1 





7020 043536 SAVREG 
012 








10$: 





7029 
7030 043574 
—— 043576 000207 


(RO)*, (R14 


16 Bea Oi«é2088 
TOPARG,R1 
ROV 
SSTORE DA 
: STORE 
32 043600 eMIst — 
043600 L10071: 
043600 104401 TRAP CSETST 





— Ee — — —— 
— — — 
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| 
E MACRO 1200 = 
TEST 10: INITIALIZE AFTER WRITE CHARACTERISTICS 


— — — 


eSBTTL TEST 10: INITIALIZE AFTER WRITE CHARACTERISTICS 
; TEST DESCRIPTION: 


This test verifies thet a Hardware Initialize command 
invoked after a Write Characteristics command sets up 





- - — — — — — — — — — 


















the Command, Message and Characteristic image blocks 
$ in the controller rem correctly. 
s TEST STEPS: 
; a FOR LOOPCNT 
: Do WRITE CHARACTERISTICS command. 
: If the NBA bit in the TSSR register is NOT=0 then Print Error. 
s Write to TSSR register to soft initialize the controller 
3 _ If controller RAM 310-377 NOT=0 then Print Error 
BGNTST on 
005037 002170 CLR FATFLG CLEAR FATAL ERROR FLAG 
012737 005672 002146 SEPRT1 .EPRTSU 2SE UP ERROR MESSAGE SWITCH 
37 003100 CLR KTFLG HOLD OFF KT11 
012700 044252 STST1IOID,RO sASCI1 MESSAGE 10 IDENTIFY TEST 
737 017226 JSR PC, TSTSETUP :00 INITIAL TEST SETUP 
012737 2 002164 ree MOV #2. ,LOOPCNT sPERFORM 2 ITERATIONS 
JSR PC, TIOREST 2SET PACKET TO START-UP VALUES 
MOV #TSTBLK+10. .R3 sSTART OF TEST DATA 
MOY #TIOPACKET .R4 sGET THE ADDRESS OF COMMAND PACKET 
oe * MOV #8. .PKBCNT(R4) START WITH MINIMUM ALLOWABLE VALUE 
JSR PC SOF INIT —59 TO TSSR TO SOFT INITIALIZE 
04 BCs 108 F SOFT INIT OKAY 
01 MOV RO,R1 SAVE CONTENTS OF TSSR 
ERRDF ERRNO, SFIERR,SF IASG DEVICE FATAL DURING INIT 
043670 TRAP CSERDF 
3672 OC WORD 1000 
74 -WORD SFIERR 
7078 76 -WORD SFIMSG 
7079 Do WRITE ee command. 
7080 043700 10S: CLR FLG SCLEAR FATAL ERROR FLAG 
7081 04 mOV Ra TebB CRS) :SEt THE PACKET ADDRESS TO EXECUTE 
— rie JSR PC ,CHKTSSR WAIT FOR = TO SET 
4 FORCE ’ FORCE ERROR IF FCRCER=1 
7084 04 BCs 15$ sBR IF CARR Y SET (GOOD RETURN) 
7085 04 BOY ROR 3 SAVE CONTENTS OF TSSR 
a Dee NEXT .ERRNO 
7087 04 12$: ERRDF ERRNO, TIOSSR.PKTSSR DEVICE FATAL SSR FAILED TO SET 
Oe TRAP CSERDF 
06 1001 
As 





— nes ’ 
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CZTUWAO T SEQ 174 
TEST 10: INITIALIZE AFTER URITE CHARACTERISTICS 











011 [WORD PKTSSR 
33 017720 JSR PC FATCHR HECK FOR MORE THAN 25 ERRORS 
15$:  CRLOOP RROR, IF FLAG 
o1es0% 000000 mov —sTSSCRS). RI , 


756 4 2702 000°90 MOV #SSR,R2 







































32701 O00C 30 BIT #OFL RI 
001402 BEQ 
052702 000100 BIS #OFL .R2 
sit the MBA bit in the TSSR register is NOT=0 then Print Error. 
FORCERROR 273 saad 
044010 020201 CMP R2,R1 DOES EXPECTED MATCH RECEIVED ? 
001404 BEQ 30$ OKAY If MATCH 
NEXT .ERRNO 
ans 273: ERRHRD ERRNO, TIONBA,PKTSSR :NBA NOT ZERO 
001752 
044364 TIONBA 
011520 PKTSSR 
30$: CKLOOP sLOOP ON ERROR ? 
: 104406 CSCLP1 
sWrite to TSSR register to soft initialize the controller 
7106 044026 40S: 
7107 88 004737 016464 JSR PC SOF INIT sWKITE 10 TSSR TO SOFT INITIALIZE 
7108 0440 ERROR £23 
7109 044046 103405 2BR IF SOFT INIT OKAY 
7110 044050 010001 3 SAVE CONTENTS OF TSSR 
7111 044052 RRNO 
7112 8 428: ERRNO, SFIERR.SF IASG sDEVICE FATAL DURING INIT 
044052 104455 TRAP CSERDF 
044054 001753 -WORD 1003 
044056 003550 WORD SFIERR 
113 044060 011506 eWORD SFIASG 
7116 if — RAM —— woT=0 then Print Error 
7115 044062 012704 000310 ids: #310 sSTART WITH LOC 310 
7116 ores «4 005002 = v EXPECTED SHOULD BE 000000 
7117 * 004737 017054 SSR READY 
Ad. 74 110465 177777 608: a SELECT RAM ADDRESS 
711 100 116501 177776 sREAD LOC CONTENTS 
7120 104 zdod 
righ 114 120102 SCHECK MEMORY FOR 000000 
71 4 116 001406 BEo sBRANCH IF DATA OKAY 
7123 0441 NEXT .ERRNO 
7124 0441 623: ERRDF ERRNO, TIOREN,RAMEXP sMERMORY NOT ZERO AFTER INIT. 
O4G1 104455 TRAP CSERDF 
0441 001754 -WORD 1004 
0441 Oa6 a TIOMER 
ort: 01 -WORD RAMEXP 
at 3 ort 004737 017720 708 ee PC .FATCHK sINC AND CHECK FOR MORE THAN 25 ERRORS 
044134 104406 TRAP CSCLPI 
7127 044136 ESCAPE TST sEXIT ON FATAL ERROR 
asat anesin epee CU —kgd? 


nearness : 


G 14 
































SEQ 175 
CZTUWAO TU8O FRONT END MACRO M1200 29-MAR-&3 17:24 PAGE 104-2 
TEST 10: INITIALIZE OTER URITE CHARACTERISTICS 
i 044140 000434 .WORD 110075-. 
7129 044142 204 828: INC Re :LOOK at NEXT RAM LOC. 
7130 044144 020427 000377 CMP RA 8377 SAT TOP OF RAM ADDRESS SPACE 
7131 044150 001351 BNE 60$ SBRANCH TILL ALL MEMORY TESTED 
rie 
7134 044152 005737 002170 TST FATFLE 
7135 044156 001402 BEQ 1608 
7136 044160 004737 017772 JSR PC, CKODROP ; DROP THE UNIT 
7187 044164 004737 017174 160$: JSR PC, TSTLOOP SDONE ALL ITERATIONS? 
7138 044170 103002 acc 16%3 BR IF YES 
7139 044172 000137 043636 JMP 7 10LO00P “LOOP UNTIL ITERATION COUNT DONE 
7140 044176 1658: 
7141 044176 EXIT TST 
044176 104432 TRAP  CSEXIT 
4 044200 000374 : } .WORD 110075-. 
7168 SLOCAL STORAGE FOR THIS TEST 
7146 044202 2 .BLKB 10°<. -TUV2A87> 
7148 044210 TIOPACKET : SCOMMAND PACKET FOR TEST 
7149 044210 100004 .WORD 100004 “WRITE CHARACTERISTICS COMMAND, WITH ACK 
7150 044212 044220 “WORD TIODATA “ADDRESS OF CHARACTERISTICS BLOCK 
7151 044214 000000 .WORD 0 
7152 044216 000010 WORD sSTARTING VALUE OF BLOCK SIZE 
7154 044220 TIODATA: sCHARACTERISTICS DATA BLOCK 
7155 0442 .WORD  TIOBFR SADDRESS OF MESSAGE BUFFER 
7156 044 WORD 
7157 04422 .WORD 14, SLENGTH OF MESSAGE BUFFER 
7158 044226 WORD 0, 
7160 044232 TIOBFR: .BLKY 8. sMESSAGE BUFFER 
7161 sLOCAL TEXT MESSAGES FOR TEST 
nt : 
7164 044252 111 156 151 TST1010: ,ASCIZ ‘Initialization After WRITE CHARACTERISTICS® 
* 044325 111 156 143 TIOMEM: ly "Incorrect RAM Data After Init’ 
7167 044366 127 122 111 TIONBA: .ASCIZ ‘WRITE CHARACTERISTICS Command Not Accepted’ 
7168 044437 103 157 156 TIOSSR: .ASCIZ ‘Contents of TSSR Incorrect After URITE PCMARACTERISTICS® 


— — — 
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SEQ 176 
CZTUWAO TU8O FRONT END MACRO M1200 29-MAR-83 13:24 PAGE 105 | 
TEST 10: INITIALIZE a FTER URITE CHARACTERISTICS | 
7171 
—33 
717% “ROUTINE TO RESTOSE COMMAND PACKET TO START-UP (DEFAULT) VALUES 
7176 te 
7177 
7178 EVEN 
7179 
7180 044526 TIOREST: 
7181 0645 SAVREG SSAVE THE REGISTERS 
7182 044532 012701 044210 MOV #TIOPACKET,R1 9; START PACKE 
7183 044536 012721 1 mov §_ #100004,(R1)+ WRITE CHARACTERISTICS WITH ACK 
7184 044542 012721 044220 MOV = MTIODATA,(R1)+ ADDRESS OF CHAR DATA BLOCK 
7185 044546 CLR (R1)4 SEXTENDED ADDRESS 
7186 044550 012721 000010 MOV s-s«#B, (RI) SSIZE OF DATA BI.OCK IN BYTES 
7187 044554 012721 044232 MOV § BTIOBFR,(R1)*  SADDRESS OF MESSAGE BUFFER 
7188 044 005021 CLR CR1)* 
7189 044562 012721 000016 MOV s-s«#14., (RID SLENGTH OF MESSAGE BUFFER 
7190 044566 005021 CLR (R1)+ 
7191 064570 005011 CLR (RI) 
7198 044572 000207 RIS PC = RETURN 
7193 044574 ENDTST 
04457 L10075: 
044574 104401 TRAP  CSETST 


; 
— — — — — — — — — — 
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CZTUWAO TUBO FRONT END PRT A MACRO M1200 29-MAR-83 15:24 PAGE 106 
TEST 10: INITIALIZE AFTER WRITE CHARACTERISTICS 


SEQ 177 


-SBTTL TEST 11: BASIC WRITE SUBSYSTEM MEMORY COMMAND 


— 
























































“THIS TEST VERIFIES THAT THE WRITE SUBSYSTEM MEMORY COMMAND WITH A 
“BSELO SELECT CODE OF 0 (NO-OP) EXECUTES CORRECTLY. IT ALSO 
“VERIFIES THAT A WRITE SUBSYSTEM MEMORY COMMAND WITH A NON-ZERO 
“MODE FIELD IS REJECTED. THE TEST FURTHER VERIFIES MICROPROGRAM 
“COMMAND DECODING AND HANDLING SEQUENCES. 
BGNTST 2. 
7 002170 CLR FLG SCLEAR FATAL ERROR FLAG 
005672 002146 MOV — .EPRTSU SET UP ERROR MESSAGE SWITCH 
003100 KTFLG sHOLD OFF KT11 
a1ST1110,R0 sASCII MESSAGE TO IDENTIFY TEST 
7? 017226 PC, TSTSETUP :D0 INITIAL TEST SETUP 
000002 002164 ‘ial #2. ,LOOPCNT :PERFORM 2 ITERATIONS 
TLL BEGIN SUBTEST eed 
RAP  C$BSUB 
045726 JSR PC, TIIREST :SET PACKET TO INITIAL VALUES 
045764 JSR PC. TIIRST °SET PACKET TO INITIAL VALUES 
SETPRI #PRIOO “LOWER PRIORITY TO ALLOW INTERRUPTS 
000000 | MOV #PRIOO, 
e TRAP CSSPRI 
BGNSEG 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP  CSBSEG 
016464 JSR PC, SOF INIT sD0 SOFT INIT OF CONTROLLER 
acs 10$ BR IF SOFT INIT = OK 
MOV R0,R1 SSAVE CONTENTS OF TSSR 
ERRDF ERRNO, SFIERR,SFIMSG “DEVICE FALAL ERROR DURING INIT 
TRAP  CSERDF 
.WORD 1101 
“WORD SFIERR 
* “WORD  SFIMSG 
045470 #T1IPK2 RG sSUBROUTINE NEEDS PACKET ADDRESS 
737 (010152 PC, WRTCHR 3 ISSUE WRITE CHARACTERISTICS 
34 044704 118 IF COMMAND ISSUED OK 
044706 01 RO,R1 “SAVE CONTENTS OF TSSR 
7239 044710 ERRNO.WRTMSG, SF IMSG “WRITE CHARACTERISTISC FAILED 
044710 104456 CSERHRD 
044712 TEORD 1102 
044714 754 "WORD  WRTMSG 
64716 * "WORD  SFIMSG 
7240 118: 
7241 044 CLR FATELG sCLEAR FATAL ERROR FLAG 
7249 044 005037 CLR INTRECV SCLEAR INTERRUPT RECEIVED FLAG 
724 ROV sTIIPACKET ,RG | “SET UP NEW WRT. SUBSYS MEM. COMMAND 
7244 044734 R&, TSDB(RS) :SET THE PACKET ESS 
724s 740 PC, sCHKTSSR WAIT SSR TO SET 
044744 005 INTRECV “DID AN INTERRUPT OCCUR ? 
7247 044750 : — — 





— — — — 


: 
— — — —— — — — — 


J 14 
























SEQ 178. 
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TEST 11: BASIC WRITE SUBSYSTEM MEMORY COMMAND | 
7251 04475 ERRHRD ERRNO, TIININT.PKTSSR | 
83 1044 TRAP  CSERHRD : 
754 002117 YORD 1103 | 
044756 045 «WORD TIIWINT | 
044760 011520 .WORD  PKISSR 
7252 044762 016501 000000 228: MOV TSSR(RS) RI sGET THE CONTENTS OF TSSR 
7253 044766 012702 000200 MOV #SSR,R2 sEXPECTED CONTENTS OF TSSR 
772 032701 000100 BIT #OFL,R1 318 OFF@LINE BIT SET ? 
7255 044776 001402 BEQ : H IF NOT OFF-LINE 
eee oesboe 8336 ono ss: te Renin — MG Ri te tl 
7258 045006 001404 BEQ Y IF MATCH 
7262 045010 ERRHRD ERRNO, T1INBA,PKTSSR mA NO NOT ZERO 
045010 104456 TRAP § CSERHRD 
045012 .WORD 1104 
pots det ants 46 eWORD TIINBA 
.WORD PKTSSR 
7263 045020 30$ 
Osean ENDSEG 8 £<<6466<44 KKK END SEGMENT <<<<K CK K KKK 
045020 104405 TRAP  CSESEG 
nt 
7267 045022 59$:  ENDSUB S\VVAAAAAAAAAN END SUBTEST \AVVAAAAAAAAA 
045022 110077: 
045022 104403 TRAP CSESUB 
045024 737 002170 TST FATFLG sANY FATAL ERRORS ? 
7270 045030 001402 BEQ *BRANCH IF NOT 
7271 045032 004737 017772 JSR PC, CKDROP :TRY TO DROP THE UNIT 
7272 045036 608: 
7273 045036 Exit TST sALL DONE THIS TEST 
045036 104432 TRAP CSEXIT 
045040 000776 .WORD 1L10076-. 
7274 
7275 se 
SLOCAL STORAGE FOR THIS TEST 
7280 045042 -BLKB 10-<.-TUV2AE7> 
5050 TIIPACKET: sCOMMAND PACKET FOR TEST 
100206 WORD 100206 “WRITE SUBSYSTEM MEM. COMMAND, WITH IE, ACK 
7284 045052 045060 TIIDATA ADDRESS OF CHARACTERISTICS BLOCK 
045054 000000 0 
7286 045056 000006 6. sSTARTING VALUE OF BLOCK SIZE 
7287 0465060 s CHARACTERISTICS DATA BLOCK 
7288 04 000 0 *BSELO BYTE 
7289 045061 000 0 >BSELI BYTE 
7290 045062 000000 0 sBSEL1 WORD 
7291 045064 000000 0 sDATA 
7292 045066 128. * MESSAGE BUFFER 
7293 | 
729% 
7296 045466 10-<.-TUV2A87> | 
7298 045470 sCOMMAND PACKET FOR TEST | 
iL .44 045470 —8 100204 sWRITE CHARA. MEM. CMND., WITH IE, ACK 
045472 045 TIIDTA . aod — 








’ 
J 
— — — — — — — — — — — —— — — —— — — — — — — — — 


CZTUWAO TUBO FRONT END PRT 
TEST 11: BASIC WRITE SUBSYSTEM MEMORY COMMAND 





7301 045474 000000 

Le 045476 000010 

730 

7305 045500 

7306 045500 045066 

7307 045502 000000 
045504 000400 

7309 045506 000000 

731 

7311 

7312 

7315 

7315 

7316 045512 127 

7317 045566 38 





7318 045660 
7319 


122 
141 


— — — — 


K 14 
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0 
8. STARTING VALUE OF BLOCK SIZE 
TI1DTA: sSELECT DATA BLOCK 
.WORD TIIBFR SADDRESS OF MESSAGE BUFFER 
“WORD 256. SLENGTH OF MESSAGE BUFFER 
“WORD 0,0 


a4 
sLOCAL TEXT MESSAGES FOR TEST 


—38 eASCIZ eit: SUBSYSTEM MEMORY Command Not Accepted’ 


NINT: "Expected Interrupt Not Received On WRITE SUBSYSTEM MEMORY’ 
TSTI1ID: = ASCIZ ‘Basic WRITE SUBSYSTEM MEMORY Command’ 


SEQ 179 


67 


CZTUWAO TUSO FRONT END 
TEST 11: BASIC WRITE SuBSYSTER MEMORY COMMAND 





732 012701 


045050 
00 


045470 
100204 
045500 
000010 
045066 


045066 








TITREST: 


TIIRST: 


SAVREG 


L 14 
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ot loat te R1 


#T11PK2,R1 

#100204 ,(R1)¢ 
aT11DTA, CR1)¢ 
Sige 





sritere <at)* 
(R1)4 

#256. ,(R1)+ 
(R1)+ 


CR1) 
TIIBFR 
PC 





00206, + 
A—— ¢ 








CL EAR AR SEL2 
SCLEAR DATA AREA 
sRETURN 


STAR 
sWRITE CHARA. WITH ACK, IE 
sADDRESS OF CHARAISTICS DATA BLOCK 


sEXTENDED ADDRESS 
3SIZE OF DATA BLOCK IN BYTES 
; ADDRESS 


sMESSAGE BUFFER 





TROUT INE TO RESTO®E COMMAND PACKET TO START-UP (DEFAULT) VALUES 
sWRITE SUBSYSTEM MEMORY COMMAND 


i. THE REGISTERS 
sSTART OF THE PACKET 

WRITE ae tin MEM. WITH ACK, IE 
ADDRESS OF DATA BLOCK 
XTENDED 








sSAVE THE REGISTERS 
ART OF THE PACKET 


sLENGTH OF MESSAGE BUFFER 


110076: 


sCLEAR 1ST LOC IN MESSAGE BUFFER 
RETURN 


TRAP 


CSETST 


SEG 180 


052670 
8461 052672 





05267 
8462 052672 
8463 052721 
8464 052745 
8465 


8466 


000015 


CZTUWAO TUSO FRONT END PRT A 
DISPLAY BREAKPOINT SETTINGS 


M14 
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~SBTTL HARDWARE PARAMETER CODING SECTION 
344 






















: THE HARDWARE PARAMETER CODING SECTION ayer MACROS 
s THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
s MACROS ARE NOT EXECUTED AS MACHINE ONS BUT 
: MACRO HE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
: WITH THE OPERATOR. 
BGNHRD 
WORD L10100-LSHARD/2 
LSHARD: : 
GPRMA HPM1,0,0,160000,177776.VES sGET TSBA/TSDB REGISTER ADDRESS. 
-WORD TSCODE 
WORD 
WORD 
«WORD 
GPRMA :GET VECTOR ADDRESS. 
WORD 
WORD 
WORD 
WORD 
GPRMD NPRSC4 0,340.0. 7,¥ES sGET INTERRUPT PRIORITY. 
-WORD TSCODE 
WORD 
WORD 340 
-WORD TSLOLIA 
WORD TSHILIA 
ENDMRD 
EVEN 
110100 
HPF1: .ASCIZ ‘DEVICE ADDRESS (TSSR) . 
HP42:  .ASCIZ ‘INTERRUPT VECTOR 
HPMS: rs "INTERRUPT PRIORITY . 


SEQ 187 


—_——- 
— — — 
— — — — — — — — 


— — — ree — —— — — 


N14 
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SEQ 182 | 
SOFTWARE PARAMETER CODING SECTION 






| 
| 
| 
| 8468 .SBTTL SOFTWARE PARAMETER CODING SECTION 
8470 soe 
8471 : THE SOFTWARE PASAMETER CODING SECTION CONTAINS MACROS 
8472 > THAT ARE USED BY inE SUPERVISOR TO BUILD P-TABLES. THE 
8473 : MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
8474 + INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
8475 * MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
osre * : WITH THE OPERATOR. 
8478 052776 — st. BGNSFT 
052776 000006 — .WORD L10101-L$S0F /2 
8479 053000 GPRML SPM1,0,-1,YES :GET RAM DUMP TEST FLAG 
053000 000130 . .WORD TSCODE 
053002 053014 .WORD SPM 
053004 177777 WORD 1 : 
8480 053006 GPRML SPM4,2,°1,YES s GET ITERATION CONTROL. 
‘ 053006 001130 .WORD TSCODE 
053010 053053 . WORD 
053012 177777 WORD 1 
1 : GPRMD SPM6,4,0,7777.0,7777.YES : GET LOCAL ERROR LIMIT 
: GPRMD  SPM7.6.D.7777.0.7777.YES : GET GLOBAL ERROR LIMIT 
8483 053014 ENDSFT 
EVEN 
053014 L10101: 
5 
053014 105 116 101: SPM1: .ASCIZ ‘ENABLE M7454 RAM DUMP ON ERROR’ 
8487 053053 111 116 110 SPM4: .ASCIZ ‘INHIBIT ITERATIONS 
8488 053103 120 105 122 SPM6: .ASCIZ ‘PER TEST ERROR LIMIT ' 
8489 053133 120 105 izz SPR?: ASCIE "PER UNIT ERROR LIMIT ° 
.SBTTL PATCH AREA 
3+ 
sDISPATCH TABLE 
s #@@ MOVE TO FRONT OF PROGRAM FOR RELEASE *** 
8497 
8498 053164 DISPATCH TESTNO 
053164 000013 .WORD 11 
053166 LSDISPATCH:: 
053166 023464 WORD 11 
| 053170 023722 .WORD 12 
053172 024 .WORD 13 
| 053174 026154 .WORD 4 : 
053176 0 WORD 15 
| 53200 031416 -WORD 16 
| 05 "WORD (‘17 
| 05 036704 WORD 18 
05 040422 .WORD 19 
| 053210 04 .WORD 110 
053212 044576 .WORD 111 
| 8499 
8500 ; 
: 8501 - FINALLY A GENEROUS PATCH AREA ees — 


— 


CZTUWAO TUSO FRONT END PRT A 
PATCH AREA 






8504 
8505 
8506 
8507 053214 
8508 
8509 


8510 
8511 055214 


8515 

8516 055220 

8517 053220 
053220 
053222 
053224 

8518 0535224 





8520 0532350 
8521 053232 


053232 
8522 055252 
8525 
8524 


053232 
000005 


000000 
000005 
172522 


8519 053226 000224 


000240 


000001 


S to 
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AND AN ADJUSTMENT TO ACCOUNT FOR 4. — B1T7"* HACK 


; DESCRIBED IN “‘SUPPRG.MEM (FOR REV 


PATCH:: 


LSLAST: 





SF NZ, .6577 
os Se: 1377+ 1 
~ENDC 


LASTAD sSET LAST USED ADDRESS. 


~EVEN 
oWORD TSFREE 
eWORD TSSIZE 


* saTTL HARD CODED P-TABLE 
DIAGNOSTIC IS PRE-PARAMETERIZED PER THIS TABLE 


BGNSETUP 1 
BGNPTAB 
WORD 0 
“WORD L10104-./2-1 
172522 
24 
PRIOS 
" ENDSETUP 
.END 


SEQ 183 


—— eal 





CZTUWAO TU8O FRONT END PRT A 
SYMBOL TABLE 


ADDSSR 
ADR = 


011612 G 








=z 

oa 

ont 
# 


BAR = 
BENBSW 002174 
BIE 


4 
SSSSSSSSSSSSSSssssoenssesssss Feusees 
SUESSuSSESSEsSSSSSSSsssessERe z828 
oe 







oooo 
ow. 
— ok 
= ) 

N 

Ww 


3 
SF 
Qacc 


o 


38833 

—X 
— 

reagaqga Tc 


id 
i 














C$D0DU= 

CSORPT= 000024 
cspu = 000053 
CSEDIT= 000003 
CSERDF= 000055 
CSER 000056 
CSER 000060 
CSERSF= 000054 
SERSO= 





maracr fdn7sé 





DLUN = 000006 
DSBINT 016674 
DUADI2 004541 


DUFLG 


000035 
017720 





3060 G 
Dummy 0050350 
EF .CON= 000056 G 
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FATERR= —88 
conan. 








GSNO = 000000 
GSOFFS= 000400 
GSOFSI= 000376 
GSPRMA= 000001 
GSPRMD= 000002 
GSPRML= 000000 
GSRADA= 000140 

006000 
GSRADD= 0060040 
GSRADL= 000120 
GSRADO= 00002f 
GSXFER= 900004 
GSYES = 


AS 
AOA 


HiADDR= 001400 
HIMEM = 5 
= 








SEQ 184 


; 
; 
ec CE — — — — — — 


CZTUWAO TUBO FRONT END PRT A 
SYMBOL TABLE 


KIPOR6= 172314 








dD 15 
MACRO M1200 29-MAR-83 15:24 PAGE 152-5 





002010 G L10057 032114 NULCR 
022702 G L10060 = 
05 G L10061 
002056 G Rhee! 

L10064 


004426 
= 004 


0036 
NARERR 005176 G 


003675 


Typ 61649 


} 


SEQ 185 | 


Se a —— 
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SYMBOL TABLE 


RECMSG 002432 G $1.1E0= 010000 TST101 044252 
RECV§ 002200 G $1. 1F A= 5660 


REGSAV 020656 
REWIND 010254 G 
RMCHBE= 000167 







TTOBFR= 

TTOCSR= 177564 
TUV2A 002000 G 
TSARGC= 000005 
TSCODE= 001130 
TSERRN= 002120 
TSEXCP= 





000000 
TSFLAG= 000040 
G TSFREE= 053232 
G TSGMAN= 000000 
TSHILI= 000007 
G TSLAST= 000001 
1 G TSLOLI= 000000 
1000 G TSLSYM= 010000 
013450 TSLTNO= 000013 
16160 TSNEST= 000000 
016026 TSNSO = 000000 
Run TSNS1 = 000005 
01611 TSNS2 = 000002 
15612 G Lt = 000003 
6 CNT= 000000 
007524 TSPTAB= 0101035 
007574 TSPTHV= 000001 
31* & TNU= 
74 TSSAVL= 177777 
8 6 TSSEGL= 177777 
TSSEKO= 010000 






TSSIZE= 000005 
TSSUBN= 000001 
TSTAGL= 177777 
TSTAGN= 010105 
TSTEMP= 000014 





TSSHU = 010000 
TSSINI= 010030 





$0. Inu⸗ 
$0. 1SP= 000200 
€i 'fE= ANIPAN 


TST110 


CZTUWAO 8 FRONT END PRT A 


SYMBOL TABL 

TS$PC = 000001 
TSSPRO= 010027 
TSSPTA= 0101035 
TSSRPT= 010035 









TSSSEG= 01 
TSSSOF= 010101 
TSSSRV= 01 


REL 
ene 


— 
SEES 


045470 


amet 
WO 





ee 


F 15 
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13.2 025250 
14 


035714 
026154 G 035640 


> 
4 
~~" 
© 
ob 
8 
ys 
© 
oy 





032741 
033472 G 
035652 








XSOCON 015015 
XSOEOT= 000001 





70 G 


X1.DLT= 100000 
X1.MBZ= ore 


X3.MBZ= 000006 
X3.MDE= 177400 


X3.0PI= 000100 


x 
x4. TSM= 020000 
x4.URC= 000577 


SEQ 187 


6 15 
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SYMBOL TABLE 


VIRTUAL MEMORY USED: 36168 WORDS ( 142 PAGES) 


DYNAMIC MEMORY: 20060 WORDS ( 77 PAGES) 
ELAPSED TIME: 00:08: 
CZTUWA.BIC,CZTUWA/-SP=SVC .MLB/ML .CZTUWA 


oo 


— — — — 


SEQ 188 


— OO LLL — — 
— —— Se 


